| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325 |
- /* A library to output the right key shortcut in any common app.
- Given a global variable babble_mode to show the environment and a
- key that calls the paste macro, do the right type of paste.
- Setting the context is done by another macro, or TBD interaction with the host.
- Huge thanks to https://en.wikipedia.org/wiki/Table_of_keyboard_shortcuts
- and https://github.com/qmk/qmk_firmware/blob/master/keyboards/planck/keymaps/jeebak/keymap.c
- */
- #include "babblePaste.h"
- #include "action_macro.h"
- #ifdef USE_BABLPASTE
- // GLOBAL variable to determine mode. Sets startup default if no eeppom
- uint8_t babble_mode =0 ;
-
- // Today I learned that the preprocessor can not create a switch statement label from an argument
- // And else statements have problems, see https://gcc.gnu.org/onlinedocs/gcc-3.0.1/cpp_3.html#SEC15
- #define BABLM(ent, macro...) \
- if ( ent == shortcut ) \
- { action_macro_play( MACRO(macro)); return MACRO_NONE; }
- const macro_t *babblePaste (keyrecord_t *record, uint8_t shortcut) {
- /* this function runs the appropriate babblepaste macro, given
- the global babble_mode, and a shortcut from the ENUM in babblePaste.h
- TODO, the pointers in this function should be stored in a PROGMEM array, not ram.
- But that requires even more clever preprocessor foo.
- */
- if ( shortcut < BABL_START_NUM || \
- shortcut >= (BABL_START_NUM + BABL_NUM_MACROS ) ) {
- return MACRO_NONE;
- }
- switch(babble_mode) {
-
- #ifdef MS_MODE
- case MS_MODE:
- BABLM( BABL_DEL_RIGHT_1C, T(DEL), END );
- BABLM( BABL_DEL_LEFT_WORD, D(LCTRL), T(BSPACE), U(LCTRL), END );
- BABLM( BABL_DEL_RIGHT_WORD,D(LCTRL), T(DEL), U(LCTRL), END );
- BABLM( BABL_GO_LEFT_1C, T(LEFT), END );
- BABLM( BABL_GO_RIGHT_1C , T(RIGHT), END );
- BABLM( BABL_GO_LEFT_WORD, D(LCTRL), T(LEFT), U(LCTRL), END );
- BABLM( BABL_GO_RIGHT_WORD, D(LCTRL), T(RIGHT), U(LCTRL), END );
- BABLM( BABL_GO_START_LINE, T(HOME), END );
- BABLM( BABL_GO_START_DOC, D(LCTRL),T(HOME), U(LCTRL),END );
- BABLM( BABL_GO_END_LINE, T(END), END );
- BABLM( BABL_GO_END_DOC, D(LCTRL),T(END), U(LCTRL),END );
- BABLM( BABL_GO_NEXT_LINE, T(DOWN), END );
- BABLM( BABL_GO_PREV_LINE, T(UP), END );
- BABLM( BABL_PGDN, T(PGDN), END );
- BABLM( BABL_PGUP, T(PGUP), END );
- #ifndef BABL_MOVEMENTONLY
- BABLM( BABL_UNDO, D(LCTRL), T(Z), U(LCTRL), END );
- BABLM( BABL_REDO, D(LCTRL), T(Y), U(LCTRL), END );
- BABLM( BABL_CUT, D(LCTRL), T(X), U(LCTRL), END );
- BABLM( BABL_COPY, D(LCTRL), T(C), U(LCTRL), END );
- BABLM( BABL_PASTE, D(LCTRL), T(V), U(LCTRL), END );
- BABLM( BABL_SELECT_ALL, D(LCTRL), T(A), U(LCTRL), END );
- BABLM( BABL_UNDO, D(LCTRL), T(Z), U(LCTRL), END );
- BABLM( BABL_REDO, D(LCTRL), T(Y), U(LCTRL), END );
- BABLM( BABL_CUT, D(LCTRL), T(X), U(LCTRL), END );
- BABLM( BABL_COPY, D(LCTRL), T(C), U(LCTRL), END );
- BABLM( BABL_PASTE, D(LCTRL), T(V), U(LCTRL), END );
- BABLM( BABL_SELECT_ALL, D(LCTRL), T(A), U(LCTRL), END );
- BABLM( BABL_FIND, D(LCTRL),T(F), U(LCTRL),END );
- BABLM( BABL_FIND_NEXT, T(F3),END );
- BABLM( BABL_FIND_REPLACE, D(LCTRL),T(H), U(LCTRL),END );
- BABLM( BABL_RUNAPP, D(LGUI),T(R), U(LGUI),END );
- BABLM( BABL_SWITCH_APP_NEXT, D(LALT),T(TAB), U(LALT),END );
- BABLM( BABL_SWITCH_APP_LAST, D(LSFT),D(LALT),T(TAB), U(LALT), U(LSFT),END );
- BABLM( BABL_CLOSE_APP, D(LALT),T(F4), U(LALT),END );
- BABLM( BABL_HELP, T(F1),END );
- #endif
- return MACRO_NONE;
-
-
- #endif /* MS_MODE*/
- #ifdef LINUX_MODE
- case LINUX_MODE:
-
- BABLM( BABL_DEL_RIGHT_1C , D(DEL), END );
- BABLM( BABL_DEL_LEFT_WORD , D(LCTRL), T(BSPACE), U(LCTRL), END );
- BABLM( BABL_DEL_RIGHT_WORD , D(LCTRL), T(DEL), U(LCTRL), END );
- BABLM( BABL_GO_LEFT_1C , T(LEFT), END );
- BABLM( BABL_GO_RIGHT_1C , T(RIGHT), END );
- BABLM( BABL_GO_LEFT_WORD , D(LCTRL), T(LEFT), U(LCTRL), END );
- BABLM( BABL_GO_RIGHT_WORD , D(LCTRL), T(RIGHT), U(LCTRL), END );
- BABLM( BABL_GO_START_LINE , T(HOME), END );
- BABLM( BABL_GO_START_DOC , D(LCTRL),T(HOME), U(LCTRL),END );
- BABLM( BABL_GO_END_LINE , T(END), END );
- BABLM( BABL_GO_END_DOC , D(LCTRL),T(END), U(LCTRL),END );
- BABLM( BABL_GO_NEXT_LINE , T(DOWN), END );
- BABLM( BABL_GO_PREV_LINE , T(UP), END );
- BABLM( BABL_PGDN , T(PGDN), END );
- BABLM( BABL_PGUP , T(PGUP), END );
- #ifndef BABL_MOVEMENTONLY
- BABLM( BABL_UNDO , D(LCTRL), T(Z), U(LCTRL), END );
- BABLM( BABL_REDO , D(LCTRL), T(Y), U(LCTRL), END );
- BABLM( BABL_CUT , D(LCTRL), T(X), U(LCTRL), END );
- BABLM( BABL_COPY , D(LCTRL), T(C), U(LCTRL), END );
- BABLM( BABL_PASTE , D(LCTRL), T(V), U(LCTRL), END );
- BABLM( BABL_SELECT_ALL, D(LCTRL), T(A), U(LCTRL), END );
- BABLM( BABL_FIND, D(LCTRL),T(F), U(LCTRL),END );
- /* BABLM(BABL_FIND_NEXT , T(F3),END ); KDE */
- BABLM( BABL_FIND_NEXT, D(LCTRL),T(G), U(LCTRL),END ); // Gnome*/
- /* BABLM( , D(LCTRL),T(R), U(LCTRL),END ); KDE */
- BABLM( BABL_FIND_REPLACE, D(LCTRL),T(H), U(LCTRL),END ); // Gnome*/
- BABLM( BABL_RUNAPP, D(LALT),T(F2), U(LALT),END );
- BABLM( BABL_SWITCH_APP_NEXT, D(LCTL),T(TAB), U(LCTL),END );
- BABLM( BABL_SWITCH_APP_LAST, D(LSFT),D(LCTL),T(TAB), U(LCTL), U(LSFT),END );
- BABLM( BABL_CLOSE_APP, D(LALT),T(F4), U(LALT),END );
- BABLM( BABL_HELP, END );
- #endif
- return MACRO_NONE;
-
- #endif
-
- #ifdef MAC_MODE
- case MAC_MODE:
- BABLM( BABL_DEL_RIGHT_1C , D(DEL), END );
- BABLM( BABL_DEL_LEFT_WORD , D(LALT), T(BSPACE), U(LALT), END );
- BABLM( BABL_DEL_RIGHT_WORD, D(LALT), T(DEL), U(LALT), END );
- BABLM( BABL_GO_LEFT_1C , T(LEFT), END );
- BABLM( BABL_GO_RIGHT_1C, T(RIGHT), END );
- BABLM( BABL_GO_LEFT_WORD , D(LALT), T(LEFT), U(LALT), END );
- BABLM( BABL_GO_RIGHT_WORD , D(LALT), T(RIGHT), U(LALT), END );
- BABLM( BABL_GO_START_LINE , D(LGUI), T(LEFT), U(LGUI), END );
- BABLM( BABL_GO_START_DOC , D(LGUI),T(UP), U(LGUI),END );
- BABLM( BABL_GO_END_LINE , D(LGUI), T(RIGHT), U(LGUI), END );
- BABLM( BABL_GO_END_DOC , D(LGUI),T(DOWN), U(LGUI),END );
- BABLM( BABL_GO_NEXT_LINE , T(DOWN), END );
- BABLM( BABL_GO_PREV_LINE , T(UP), END );
- BABLM( BABL_PGDN , D(LALT),T(DOWN), U(LALT), END );
- BABLM( BABL_PGUP , D(LALT),T(UP), U(LALT), END );
- #ifndef BABL_MOVEMENTONLY
- BABLM( BABL_UNDO , D(1), D(LGUI), T(Z), U(LGUI), END );
- BABLM( BABL_REDO , D(LSFT),D(LGUI), T(Z), U(LSFT),U(LGUI), END );
- BABLM( BABL_CUT , D(LGUI), T(X), U(LGUI), END );
- BABLM( BABL_COPY , D(LGUI), T(C), U(LGUI), END );
- BABLM( BABL_PASTE , D(LGUI), T(V), U(LGUI), END );
- BABLM( BABL_SELECT_ALL , D(LGUI), T(A), U(LGUI), END );
- BABLM( BABL_FIND , D(LGUI),T(F), U(LGUI),END );
- BABLM( BABL_FIND_NEXT, D(LGUI),T(G), U(LGUI),END );
- BABLM( BABL_FIND_REPLACE, D(LGUI),T(F), U(LGUI),END );
- BABLM( BABL_RUNAPP , D(LGUI),T(R), U(LGUI),END );
- BABLM( BABL_SWITCH_APP_NEXT , D(LGUI),T(TAB), U(LGUI),END );
- BABLM( BABL_SWITCH_APP_LAST , D(LSFT),D(LGUI),T(TAB), U(LGUI), U(LSFT),END );
- BABLM( BABL_CLOSE_APP , D(LGUI),T(Q), U(LGUI),END );
- BABLM( BABL_HELP , D(LSFT),D(LGUI),T(SLASH), U(LGUI), U(LSFT),END );
- #endif
-
- return MACRO_NONE;
- #endif
-
- #ifdef EMACS_MODE
- case EMACS_MODE:
- switch(shortcut) {
- //probably should allow meta to not be ALT
-
- case BABL_DEL_RIGHT_1C:
- BABLM( , D(LCTL), T(D), U(LCTL),END );
- case BABL_DEL_LEFT_WORD:
- BABLM( , D(LCTL), T(BSPACE), U(LCTL), END );
- case BABL_DEL_RIGHT_WORD:
- BABLM( , D(LALT), T(D), U(LALT), END );
- case BABL_GO_LEFT_1C:
- BABLM( , T(LEFT), END );
- case BABL_GO_RIGHT_1C:
- BABLM( , T(RIGHT), END );
- case BABL_GO_LEFT_WORD:
- BABLM( , D(LALT), T(B), U(LALT), END );
- case BABL_GO_RIGHT_WORD:
- BABLM( , D(LALT), T(F), U(LALT), END );
- case BABL_GO_START_LINE:
- BABLM( , D(LCTRL), T(A), U(LCTRL), END );
- case BABL_GO_START_DOC:
- BABLM( , D(LALT), D(LSFT), T(COMM),U(LSFT), U(LALT) ,END );
- case BABL_GO_END_LINE:
- BABLM( , D(LCTRL), T(E), U(LCTRL), END );
- case BABL_GO_END_DOC:
- BABLM( , D(LALT), D(LSFT), T(DOT),U(LSFT), U(LALT) ,END );
- case BABL_GO_NEXT_LINE:
- BABLM( , D(LCTRL), T(N), U(LCTRL), END );
- case BABL_GO_PREV_LINE:
- BABLM( , D(LCTRL), T(P), U(LCTRL), END );
- case BABL_PGDN:
- BABLM( ,D(LCTRL), T(V), U(LCTRL), END );
- case BABL_PGUP:
- BABLM( , D(LALT), T(V), U(LALT), END );
- #ifndef BABL_MOVEMENTONLY
- case BABL_UNDO:
- BABLM( , D(LCTL), T(X), U(LCTL),T(C), END );
- case BABL_REDO:
- BABLM( , D(LCTL), T(X), U(LCTL),T(C), END ); // arguably
- case BABL_CUT:
- BABLM( , D(LCTL), T(W), U(LCTL), END );
- case BABL_COPY:
- BABLM( , D(LALT), T(W), U(LALT), END ); //really?
- case BABL_PASTE:
- BABLM( , D(LCTL), T(Y), U(LCTL), END );
- case BABL_SELECT_ALL:
- BABLM( ,D(LCTL), T(X), U(LCTL),T(H), END );
- case BABL_FIND:
- BABLM( , D(LCTRL), T(S), U(LCTRL),END );
- case BABL_FIND_NEXT:
- BABLM( , D(LCTRL), T(S), U(LCTRL),END );
- case BABL_FIND_REPLACE:
- BABLM( , D(LALT),D(LSFT), T(5),U(LSFT), U(LALT), END );
- case BABL_RUNAPP:
- BABLM( , D(LALT), T(X), U(LALT),T(S),T(H),T(E),T(L),T(L),END );// arguably
- case BABL_SWITCH_APP_NEXT:
- BABLM( , D(LCTL), T(X), U(LCTL),T(RIGHT), END ); // arguably
- case BABL_SWITCH_APP_LAST:
- BABLM( , D(LCTL), T(X), U(LCTL),T(LEFT), END ); // arguably
- case BABL_CLOSE_APP:
- BABLM( ,D(LCTL), T(X), U(LCTL),T(C),END );
- case BABL_HELP:
- BABLM( , D(LCTL),T(H), U(LCTL),T(A),END); // start search in help
- #endif
- break;
-
- return MACRO_NONE;
- }
-
- #endif
- #ifdef VI_MODE
- case VI_MODE:
- //assume esc is already called
-
- BABLM( BABL_DEL_RIGHT_1C , T(X),END );
- BABLM( BABL_DEL_LEFT_WORD , T(D),T(G),T(E),END );
- BABLM( BABL_DEL_RIGHT_WORD , T(D),T(W),END );
- BABLM( BABL_GO_LEFT_1C , T(H), END );
- BABLM( BABL_GO_RIGHT_1C , T(L), END );
- BABLM( BABL_GO_LEFT_WORD , T(B),END );
- BABLM( BABL_GO_RIGHT_WORD , T(W), END );
- BABLM( BABL_GO_START_LINE , D(LSFT), T(6),U(LSFT), END ); //^
- BABLM( BABL_GO_START_DOC , T(G),T(G) ,END );
- BABLM( BABL_GO_END_LINE , D(LSFT), T(4),U(LSFT) , END ); //$
- BABLM( BABL_GO_END_DOC , D(LSFT), T(G),U(LSFT),END );
- BABLM( BABL_GO_NEXT_LINE , T(J), END );
- BABLM( BABL_GO_PREV_LINE, T(K), END );
- BABLM( BABL_PGDN ,D(LCTRL), T(F), U(LCTRL), END );
- BABLM( BABL_PGUP , D(LCTRL), T(B), U(LCTRL), END );
- #ifndef BABL_MOVEMENTONLY
- BABLM( BABL_UNDO , T(U), END );
- BABLM( BABL_REDO , D(LCTL), T(R), U(LCTL), END );
- BABLM( BABL_CUT , T(X), END );
- BABLM( BABL_COPY , T(Y),END );
- BABLM( BABL_PASTE , T(P), END );
- BABLM( BABL_SELECT_ALL , D(LSFT), T(SCLN),U(LSFT),D(LSFT), T(5),U(LSFT),T(Y), END ); // wrong but helpful?
- BABLM( BABL_FIND , T(SLASH),END );
- BABLM( BABL_FIND_NEXT , T(N),END );
- BABLM( BABL_FIND_REPLACE , D(LALT),D(LSFT), T(5),U(LSFT), U(LALT), END );
- BABLM( BABL_RUNAPP,END );
- BABLM( BABL_SWITCH_APP_NEXT ,END );
- BABLM( BABL_SWITCH_APP_LAST ,END );
- BABLM(BABL_CLOSE_APP, D(LSFT), T(SCLN),U(LSFT), T(Q), D(RSFT), T(1),U(RSFT), END );
- BABLM(BABL_HELP, D(LSFT), T(SCLN),U(LSFT),T(H),END); // start search in help
- #endif
- return MACRO_NONE;
- #endif
- #ifdef READMUX_MODE
- // Readline command line editing + tmux windowing
- // I havent decided how much to do readline and how much tmux
- case READMUX_MODE:
- BABLM( BABL_DEL_RIGHT_1C , D(LCTL), T(D), U(LCTL),END );
- BABLM( BABL_DEL_LEFT_WORD , D(LCTL), T(W), U(LCTL), END );
- BABLM( BABL_DEL_RIGHT_WORD , D(LALT), T(D), U(LALT), END );
- BABLM( BABL_GO_LEFT_1C , T(LEFT), END );
- BABLM( BABL_GO_RIGHT_1C , T(RIGHT), END );
- BABLM( BABL_GO_LEFT_WORD , D(LALT), T(B), U(LALT), END );
- BABLM( BABL_GO_RIGHT_WORD , D(LALT), T(F), U(LALT), END );
- BABLM( BABL_GO_START_LINE , D(LCTRL), T(A), U(LCTRL), END );
- BABLM( BABL_GO_START_DOC ,END );// tmux?
- BABLM( BABL_GO_END_LINE , D(LCTRL), T(E), U(LCTRL), END );
- BABLM( BABL_GO_END_DOC ,END ); // tmux?
- BABLM( BABL_GO_NEXT_LINE , D(LCTRL), T(N), U(LCTRL), END );
- BABLM( BABL_GO_PREV_LINE , D(LCTRL), T(P), U(LCTRL), END );
- BABLM( BABL_PGDN , T(PGDN), END );
- BABLM( BABL_PGUP , T(PGUP), END );
- #ifndef BABL_MOVEMENTONLY
- BABLM( BABL_UNDO , D(LALT), T(R), U(LALT) , END );
- BABLM( BABL_REDO , D(LCTL), T(X), U(LCTL),T(C), END ); // arguably
- BABLM( BABL_CUT , D(LCTL), T(K), U(LCTL), END ); // wrong half the time
- BABLM( BABL_COPY ,END );
- BABLM( BABL_PASTE , D(LCTL), T(Y), U(LCTL), END );
- BABLM( BABL_SELECT_ALL ,D(LCTL), T(A), T(K), T(Y), U(LCTL) , END );
- BABLM( BABL_FIND , D(LCTRL), T(R), U(LCTRL), END ); // search history
- BABLM(BABL_FIND_NEXT, D(LCTRL), T(S), U(LCTRL), END );
- BABLM( BABL_FIND_REPLACE ,END );
- BABLM( BABL_RUNAPP , D(LCTRL), T(B), U(LCTRL), T(C),END ); //tmux
- BABLM( BABL_SWITCH_APP_NEXT , D(LCTRL), T(B), U(LCTRL), T(N),END ); //tmux
- BABLM( BABL_SWITCH_APP_LAST , D(LCTRL), T(B), U(LCTRL), T(P),END ); //tmux
- BABLM( BABL_CLOSE_APP , D(LCTRL), T(B), U(LCTRL), T(D),END); // usually what I want
- BABLM( BABL_HELP ,END );
- #endif
-
- return MACRO_NONE;
-
- #endif
- default:
- return MACRO_NONE;
- }
- }
- #endif
|