mirror of https://github.com/MidnightCommander/mc
295 lines
7.8 KiB
C
295 lines
7.8 KiB
C
/* Editor key translation.
|
|
|
|
Copyright (C) 1996, 1997 the Free Software Foundation
|
|
|
|
Authors: 1996, 1997 Paul Sheer
|
|
|
|
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, write to the Free Software
|
|
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
|
|
02111-1307, USA.
|
|
*/
|
|
|
|
#include <config.h>
|
|
#include "edit.h"
|
|
#include "edit-widget.h" /* edit->macro_i */
|
|
#include "editcmddef.h" /* list of commands */
|
|
#include "../src/key.h" /* KEY_M_SHIFT */
|
|
#include "../src/tty.h" /* keys */
|
|
#include "../src/charsets.h" /* convert_from_input_c() */
|
|
#include "../src/selcodepage.h" /* do_select_codepage() */
|
|
|
|
/*
|
|
* Ordinary translations. Note that the keys listed first take priority
|
|
* when the key is assigned to more than one command.
|
|
*/
|
|
static const long cooledit_key_map[] = {
|
|
ALT ('b'), CK_Match_Bracket,
|
|
ALT ('m'), CK_Mail,
|
|
XCTRL ('f'), CK_Save_Block,
|
|
XCTRL ('n'), CK_New,
|
|
XCTRL ('p'), CK_Pipe_Block (1), /* spell check */
|
|
XCTRL ('x'), CK_Word_Right,
|
|
XCTRL ('y'), CK_Delete_Line,
|
|
XCTRL ('z'), CK_Word_Left,
|
|
0, 0
|
|
};
|
|
|
|
static long const emacs_key_map[] = {
|
|
ALT ('$'), CK_Pipe_Block (1), /* spell check */
|
|
ALT ('b'), CK_Word_Left,
|
|
ALT ('f'), CK_Word_Right,
|
|
ALT ('v'), CK_Page_Up,
|
|
ALT ('w'), CK_XStore,
|
|
XCTRL ('@'), CK_Mark,
|
|
XCTRL ('a'), CK_Home,
|
|
XCTRL ('b'), CK_Left,
|
|
XCTRL ('e'), CK_End,
|
|
XCTRL ('f'), CK_Right,
|
|
XCTRL ('g'), CK_Ignore_Key,
|
|
XCTRL ('n'), CK_Down,
|
|
XCTRL ('p'), CK_Up,
|
|
XCTRL ('s'), CK_Find,
|
|
XCTRL ('v'), CK_Page_Down,
|
|
XCTRL ('w'), CK_XCut,
|
|
XCTRL ('y'), CK_XPaste,
|
|
0, 0
|
|
};
|
|
|
|
static long const common_key_map[] = {
|
|
'\n', CK_Enter,
|
|
'\t', CK_Tab,
|
|
|
|
ESC_CHAR, CK_Exit,
|
|
KEY_BACKSPACE, CK_BackSpace,
|
|
KEY_DC, CK_Delete,
|
|
KEY_DOWN, CK_Down,
|
|
KEY_END, CK_End,
|
|
KEY_HOME, CK_Home,
|
|
KEY_IC, CK_Toggle_Insert,
|
|
KEY_LEFT, CK_Left,
|
|
KEY_NPAGE, CK_Page_Down,
|
|
KEY_PPAGE, CK_Page_Up,
|
|
KEY_RIGHT, CK_Right,
|
|
KEY_UP, CK_Up,
|
|
|
|
ALT ('\n'), CK_Return,
|
|
ALT ('\t'), CK_Complete_Word,
|
|
ALT ('l'), CK_Goto,
|
|
ALT ('L'), CK_Goto,
|
|
ALT ('p'), CK_Paragraph_Format,
|
|
ALT ('t'), CK_Sort,
|
|
ALT ('u'), CK_ExtCmd,
|
|
ALT ('<'), CK_Beginning_Of_Text,
|
|
ALT ('>'), CK_End_Of_Text,
|
|
ALT (KEY_BACKSPACE), CK_Delete_Word_Left,
|
|
|
|
XCTRL ('k'), CK_Delete_To_Line_End,
|
|
XCTRL ('l'), CK_Refresh,
|
|
XCTRL ('o'), CK_Shell,
|
|
XCTRL ('u'), CK_Undo,
|
|
|
|
KEY_F (1), CK_Help,
|
|
KEY_F (2), CK_Save,
|
|
KEY_F (3), CK_Mark,
|
|
KEY_F (4), CK_Replace,
|
|
KEY_F (5), CK_Copy,
|
|
KEY_F (6), CK_Move,
|
|
KEY_F (7), CK_Find,
|
|
KEY_F (8), CK_Remove,
|
|
KEY_F (10), CK_Exit,
|
|
KEY_F (11), CK_User_Menu, /* edit user menu */
|
|
KEY_F (12), CK_Save_As,
|
|
KEY_F (13), CK_Column_Mark,
|
|
KEY_F (14), CK_Replace_Again,
|
|
KEY_F (15), CK_Insert_File,
|
|
KEY_F (17), CK_Find_Again,
|
|
KEY_F (19), CK_Pipe_Block (0), /* C formatter */
|
|
|
|
/* Shift */
|
|
KEY_M_SHIFT | KEY_PPAGE, CK_Page_Up_Highlight,
|
|
KEY_M_SHIFT | KEY_NPAGE, CK_Page_Down_Highlight,
|
|
KEY_M_SHIFT | KEY_LEFT, CK_Left_Highlight,
|
|
KEY_M_SHIFT | KEY_RIGHT, CK_Right_Highlight,
|
|
KEY_M_SHIFT | KEY_UP, CK_Up_Highlight,
|
|
KEY_M_SHIFT | KEY_DOWN, CK_Down_Highlight,
|
|
KEY_M_SHIFT | KEY_HOME, CK_Home_Highlight,
|
|
KEY_M_SHIFT | KEY_END, CK_End_Highlight,
|
|
KEY_M_SHIFT | KEY_IC, CK_XPaste,
|
|
KEY_M_SHIFT | KEY_DC, CK_XCut,
|
|
KEY_M_SHIFT | '\n', CK_Return, /* useful for pasting multiline text */
|
|
|
|
/* Ctrl */
|
|
KEY_M_CTRL | (KEY_F (2)), CK_Save_As,
|
|
KEY_M_CTRL | (KEY_F (4)), CK_Replace_Again,
|
|
KEY_M_CTRL | (KEY_F (7)), CK_Find_Again,
|
|
KEY_M_CTRL | KEY_BACKSPACE, CK_Undo,
|
|
KEY_M_CTRL | KEY_PPAGE, CK_Beginning_Of_Text,
|
|
KEY_M_CTRL | KEY_NPAGE, CK_End_Of_Text,
|
|
KEY_M_CTRL | KEY_HOME, CK_Beginning_Of_Text,
|
|
KEY_M_CTRL | KEY_END, CK_End_Of_Text,
|
|
KEY_M_CTRL | KEY_UP, CK_Scroll_Up,
|
|
KEY_M_CTRL | KEY_DOWN, CK_Scroll_Down,
|
|
KEY_M_CTRL | KEY_LEFT, CK_Word_Left,
|
|
KEY_M_CTRL | KEY_RIGHT, CK_Word_Right,
|
|
KEY_M_CTRL | KEY_IC, CK_XStore,
|
|
KEY_M_CTRL | KEY_DC, CK_Remove,
|
|
|
|
/* Ctrl + Shift */
|
|
KEY_M_SHIFT | KEY_M_CTRL | KEY_PPAGE, CK_Beginning_Of_Text_Highlight,
|
|
KEY_M_SHIFT | KEY_M_CTRL | KEY_NPAGE, CK_End_Of_Text_Highlight,
|
|
KEY_M_SHIFT | KEY_M_CTRL | KEY_LEFT, CK_Word_Left_Highlight,
|
|
KEY_M_SHIFT | KEY_M_CTRL | KEY_RIGHT, CK_Word_Right_Highlight,
|
|
KEY_M_SHIFT | KEY_M_CTRL | KEY_UP, CK_Scroll_Up_Highlight,
|
|
KEY_M_SHIFT | KEY_M_CTRL | KEY_DOWN, CK_Scroll_Down_Highlight,
|
|
|
|
0, 0
|
|
};
|
|
|
|
|
|
/*
|
|
* Translate the keycode into either 'command' or 'char_for_insertion'.
|
|
* 'command' is one of the editor commands from editcmddef.h.
|
|
*/
|
|
int
|
|
edit_translate_key (WEdit *edit, long x_key, int *cmd, int *ch)
|
|
{
|
|
int command = CK_Insert_Char;
|
|
int char_for_insertion = -1;
|
|
int i = 0;
|
|
static const long *key_map;
|
|
|
|
switch (edit_key_emulation) {
|
|
case EDIT_KEY_EMULATION_NORMAL:
|
|
key_map = cooledit_key_map;
|
|
break;
|
|
case EDIT_KEY_EMULATION_EMACS:
|
|
key_map = emacs_key_map;
|
|
if (x_key == XCTRL ('x')) {
|
|
int ext_key;
|
|
ext_key =
|
|
edit_raw_key_query (" Ctrl-X ", _(" Emacs key: "), 0);
|
|
switch (ext_key) {
|
|
case 's':
|
|
command = CK_Save;
|
|
goto fin;
|
|
case 'x':
|
|
command = CK_Exit;
|
|
goto fin;
|
|
case 'k':
|
|
command = CK_New;
|
|
goto fin;
|
|
case 'e':
|
|
command =
|
|
CK_Macro (edit_raw_key_query
|
|
(_(" Execute Macro "),
|
|
_(" Press macro hotkey: "), 1));
|
|
if (command == CK_Macro (0))
|
|
command = CK_Insert_Char;
|
|
goto fin;
|
|
}
|
|
goto fin;
|
|
}
|
|
break;
|
|
}
|
|
|
|
#ifdef HAVE_CHARSET
|
|
if (x_key == XCTRL ('t')) {
|
|
do_select_codepage ();
|
|
|
|
edit->force = REDRAW_COMPLETELY;
|
|
command = CK_Refresh;
|
|
goto fin;
|
|
}
|
|
#endif
|
|
|
|
if (x_key == XCTRL ('q')) {
|
|
char_for_insertion =
|
|
edit_raw_key_query (_(" Insert Literal "),
|
|
_(" Press any key: "), 0);
|
|
goto fin;
|
|
}
|
|
if (x_key == XCTRL ('a')
|
|
&& edit_key_emulation != EDIT_KEY_EMULATION_EMACS) {
|
|
command =
|
|
CK_Macro (edit_raw_key_query
|
|
(_(" Execute Macro "), _(" Press macro hotkey: "),
|
|
1));
|
|
if (command == CK_Macro (0))
|
|
command = CK_Insert_Char;
|
|
goto fin;
|
|
}
|
|
/* edit is a pointer to the widget */
|
|
if (edit)
|
|
if (x_key == XCTRL ('r')) {
|
|
command =
|
|
edit->macro_i <
|
|
0 ? CK_Begin_Record_Macro : CK_End_Record_Macro;
|
|
goto fin;
|
|
}
|
|
|
|
|
|
/* an ordinary insertable character */
|
|
if (x_key < 256) {
|
|
int c = convert_from_input_c (x_key);
|
|
|
|
if (is_printable (c)) {
|
|
char_for_insertion = c;
|
|
goto fin;
|
|
}
|
|
}
|
|
|
|
/* Commands specific to the key emulation */
|
|
i = 0;
|
|
while (key_map[i] && (key_map[i] != x_key))
|
|
i += 2;
|
|
if (key_map[i]) {
|
|
command = key_map[i + 1];
|
|
goto fin;
|
|
}
|
|
|
|
/* Commands common for the key emulations */
|
|
key_map = common_key_map;
|
|
i = 0;
|
|
while (key_map[i] && (key_map[i] != x_key))
|
|
i += 2;
|
|
if (key_map[i]) {
|
|
command = key_map[i + 1];
|
|
goto fin;
|
|
}
|
|
|
|
/* Function still not found for this key, so try macros */
|
|
/* This allows the same macro to be
|
|
enabled by either eg "ALT('f')" or "XCTRL('f')" or "XCTRL('a'), 'f'" */
|
|
|
|
if (x_key & ALT (0)) { /* is an alt key ? */
|
|
command = CK_Macro (x_key - ALT (0));
|
|
goto fin;
|
|
}
|
|
if (x_key < ' ') { /* is a ctrl key ? */
|
|
command = CK_Macro (x_key);
|
|
goto fin;
|
|
}
|
|
fin:
|
|
|
|
*cmd = command;
|
|
*ch = char_for_insertion;
|
|
|
|
if (command == CK_Insert_Char && char_for_insertion == -1) {
|
|
/* unchanged, key has no function here */
|
|
return 0;
|
|
}
|
|
|
|
return 1;
|
|
}
|