annotate src/map.c @ 29014:45c182c4f7e9 v8.2.5029

patch 8.2.5029: "textlock" is always zero Commit: https://github.com/vim/vim/commit/cfe456543e840d133399551f8626d985e1fb1958 Author: zeertzjq <zeertzjq@outlook.com> Date: Fri May 27 17:26:55 2022 +0100 patch 8.2.5029: "textlock" is always zero Problem: "textlock" is always zero. Solution: Remove "textlock" and rename "textwinlock" to "textlock". (closes #10489)
author Bram Moolenaar <Bram@vim.org>
date Fri, 27 May 2022 18:30:04 +0200
parents 1ad71fcbf546
children 1ec1ba7e7728
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1 /* vi:set ts=8 sts=4 sw=4 noet:
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2 *
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3 * VIM - Vi IMproved by Bram Moolenaar
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
4 *
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
5 * Do ":help uganda" in Vim to read copying and usage conditions.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
6 * Do ":help credits" in Vim to see a list of people who contributed.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
7 * See README.txt for an overview of the Vim source code.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
8 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
9
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
10 /*
26224
7d66d585bffa patch 8.2.3643: header for source file is outdated
Bram Moolenaar <Bram@vim.org>
parents: 25431
diff changeset
11 * map.c: Code for mappings and abbreviations.
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
12 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
13
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
14 #include "vim.h"
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
15
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
16 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
17 * List used for abbreviations.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
18 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
19 static mapblock_T *first_abbr = NULL; // first entry in abbrlist
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
20
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
21 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
22 * Each mapping is put in one of the 256 hash lists, to speed up finding it.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
23 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
24 static mapblock_T *(maphash[256]);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
25 static int maphash_valid = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
26
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
27 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
28 * Make a hash value for a mapping.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
29 * "mode" is the lower 4 bits of the State for the mapping.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
30 * "c1" is the first character of the "lhs".
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
31 * Returns a value between 0 and 255, index in maphash.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
32 * Put Normal/Visual mode mappings mostly separately from Insert/Cmdline mode.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
33 */
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
34 #define MAP_HASH(mode, c1) (((mode) & (MODE_NORMAL | MODE_VISUAL | MODE_SELECT | MODE_OP_PENDING | MODE_TERMINAL)) ? (c1) : ((c1) ^ 0x80))
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
35
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
36 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
37 * Get the start of the hashed map list for "state" and first character "c".
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
38 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
39 mapblock_T *
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
40 get_maphash_list(int state, int c)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
41 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
42 return maphash[MAP_HASH(state, c)];
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
43 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
44
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
45 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
46 * Get the buffer-local hashed map list for "state" and first character "c".
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
47 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
48 mapblock_T *
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
49 get_buf_maphash_list(int state, int c)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
50 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
51 return curbuf->b_maphash[MAP_HASH(state, c)];
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
52 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
53
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
54 int
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
55 is_maphash_valid(void)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
56 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
57 return maphash_valid;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
58 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
59
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
60 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
61 * Initialize maphash[] for first use.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
62 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
63 static void
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
64 validate_maphash(void)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
65 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
66 if (!maphash_valid)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
67 {
20007
aadd1cae2ff5 patch 8.2.0559: clearing a struct is verbose
Bram Moolenaar <Bram@vim.org>
parents: 19870
diff changeset
68 CLEAR_FIELD(maphash);
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
69 maphash_valid = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
70 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
71 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
72
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
73 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
74 * Delete one entry from the abbrlist or maphash[].
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
75 * "mpp" is a pointer to the m_next field of the PREVIOUS entry!
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
76 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
77 static void
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
78 map_free(mapblock_T **mpp)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
79 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
80 mapblock_T *mp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
81
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
82 mp = *mpp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
83 vim_free(mp->m_keys);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
84 vim_free(mp->m_str);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
85 vim_free(mp->m_orig_str);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
86 *mpp = mp->m_next;
27165
0bb71ef751bb patch 8.2.4111: potential proglem when map is deleted while executing
Bram Moolenaar <Bram@vim.org>
parents: 27061
diff changeset
87 #ifdef FEAT_EVAL
27239
bd072d44eb2c patch 8.2.4148: deleting any mapping may cause <ScritpCmd> to fail
Bram Moolenaar <Bram@vim.org>
parents: 27223
diff changeset
88 reset_last_used_map(mp);
27165
0bb71ef751bb patch 8.2.4111: potential proglem when map is deleted while executing
Bram Moolenaar <Bram@vim.org>
parents: 27061
diff changeset
89 #endif
27243
c072eed37deb patch 8.2.4150: Coverity warns for using pointer after free
Bram Moolenaar <Bram@vim.org>
parents: 27239
diff changeset
90 vim_free(mp);
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
91 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
92
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
93 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
94 * Return characters to represent the map mode in an allocated string.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
95 * Returns NULL when out of memory.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
96 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
97 static char_u *
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
98 map_mode_to_chars(int mode)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
99 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
100 garray_T mapmode;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
101
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
102 ga_init2(&mapmode, 1, 7);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
103
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
104 if ((mode & (MODE_INSERT | MODE_CMDLINE)) == (MODE_INSERT | MODE_CMDLINE))
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
105 ga_append(&mapmode, '!'); // :map!
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
106 else if (mode & MODE_INSERT)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
107 ga_append(&mapmode, 'i'); // :imap
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
108 else if (mode & MODE_LANGMAP)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
109 ga_append(&mapmode, 'l'); // :lmap
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
110 else if (mode & MODE_CMDLINE)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
111 ga_append(&mapmode, 'c'); // :cmap
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
112 else if ((mode
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
113 & (MODE_NORMAL | MODE_VISUAL | MODE_SELECT | MODE_OP_PENDING))
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
114 == (MODE_NORMAL | MODE_VISUAL | MODE_SELECT | MODE_OP_PENDING))
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
115 ga_append(&mapmode, ' '); // :map
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
116 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
117 {
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
118 if (mode & MODE_NORMAL)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
119 ga_append(&mapmode, 'n'); // :nmap
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
120 if (mode & MODE_OP_PENDING)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
121 ga_append(&mapmode, 'o'); // :omap
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
122 if (mode & MODE_TERMINAL)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
123 ga_append(&mapmode, 't'); // :tmap
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
124 if ((mode & (MODE_VISUAL | MODE_SELECT)) == (MODE_VISUAL | MODE_SELECT))
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
125 ga_append(&mapmode, 'v'); // :vmap
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
126 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
127 {
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
128 if (mode & MODE_VISUAL)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
129 ga_append(&mapmode, 'x'); // :xmap
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
130 if (mode & MODE_SELECT)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
131 ga_append(&mapmode, 's'); // :smap
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
132 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
133 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
134
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
135 ga_append(&mapmode, NUL);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
136 return (char_u *)mapmode.ga_data;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
137 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
138
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
139 static void
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
140 showmap(
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
141 mapblock_T *mp,
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
142 int local) // TRUE for buffer-local map
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
143 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
144 int len = 1;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
145 char_u *mapchars;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
146
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
147 if (message_filtered(mp->m_keys) && message_filtered(mp->m_str))
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
148 return;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
149
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
150 if (msg_didout || msg_silent != 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
151 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
152 msg_putchar('\n');
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
153 if (got_int) // 'q' typed at MORE prompt
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
154 return;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
155 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
156
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
157 mapchars = map_mode_to_chars(mp->m_mode);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
158 if (mapchars != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
159 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
160 msg_puts((char *)mapchars);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
161 len = (int)STRLEN(mapchars);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
162 vim_free(mapchars);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
163 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
164
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
165 while (++len <= 3)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
166 msg_putchar(' ');
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
167
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
168 // Display the LHS. Get length of what we write.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
169 len = msg_outtrans_special(mp->m_keys, TRUE, 0);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
170 do
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
171 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
172 msg_putchar(' '); // padd with blanks
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
173 ++len;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
174 } while (len < 12);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
175
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
176 if (mp->m_noremap == REMAP_NONE)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
177 msg_puts_attr("*", HL_ATTR(HLF_8));
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
178 else if (mp->m_noremap == REMAP_SCRIPT)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
179 msg_puts_attr("&", HL_ATTR(HLF_8));
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
180 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
181 msg_putchar(' ');
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
182
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
183 if (local)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
184 msg_putchar('@');
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
185 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
186 msg_putchar(' ');
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
187
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
188 // Use FALSE below if we only want things like <Up> to show up as such on
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
189 // the rhs, and not M-x etc, TRUE gets both -- webb
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
190 if (*mp->m_str == NUL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
191 msg_puts_attr("<Nop>", HL_ATTR(HLF_8));
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
192 else
28686
141fb1d233ba patch 8.2.4867: listing of mapping with K_SPECIAL is wrong
Bram Moolenaar <Bram@vim.org>
parents: 28674
diff changeset
193 msg_outtrans_special(mp->m_str, FALSE, 0);
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
194 #ifdef FEAT_EVAL
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
195 if (p_verbose > 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
196 last_set_msg(mp->m_script_ctx);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
197 #endif
27750
fc0a37304590 patch 8.2.4401: map listing does not clear the rest of the command line
Bram Moolenaar <Bram@vim.org>
parents: 27490
diff changeset
198 msg_clr_eos();
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
199 out_flush(); // show one line at a time
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
200 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
201
20506
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
202 static int
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
203 map_add(
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
204 mapblock_T **map_table,
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
205 mapblock_T **abbr_table,
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
206 char_u *keys,
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
207 char_u *rhs,
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
208 char_u *orig_rhs,
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
209 int noremap,
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
210 int nowait,
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
211 int silent,
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
212 int mode,
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
213 int is_abbr,
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
214 #ifdef FEAT_EVAL
20510
3d9a2c8d4f95 patch 8.2.0809: build failure with small features
Bram Moolenaar <Bram@vim.org>
parents: 20506
diff changeset
215 int expr,
20506
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
216 scid_T sid, // -1 to use current_sctx
27223
ea2b4cb4515b patch 8.2.4140: maparg() does not indicate the type of script
Bram Moolenaar <Bram@vim.org>
parents: 27221
diff changeset
217 int scriptversion,
20506
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
218 linenr_T lnum,
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
219 #endif
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
220 int simplified)
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
221 {
27221
165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation
Bram Moolenaar <Bram@vim.org>
parents: 27165
diff changeset
222 mapblock_T *mp = ALLOC_CLEAR_ONE(mapblock_T);
20506
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
223
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
224 if (mp == NULL)
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
225 return FAIL;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
226
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
227 // If CTRL-C has been mapped, don't always use it for Interrupting.
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
228 if (*keys == Ctrl_C)
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
229 {
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
230 if (map_table == curbuf->b_maphash)
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
231 curbuf->b_mapped_ctrl_c |= mode;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
232 else
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
233 mapped_ctrl_c |= mode;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
234 }
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
235
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
236 mp->m_keys = vim_strsave(keys);
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
237 mp->m_str = vim_strsave(rhs);
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
238 mp->m_orig_str = vim_strsave(orig_rhs);
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
239 if (mp->m_keys == NULL || mp->m_str == NULL)
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
240 {
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
241 vim_free(mp->m_keys);
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
242 vim_free(mp->m_str);
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
243 vim_free(mp->m_orig_str);
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
244 vim_free(mp);
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
245 return FAIL;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
246 }
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
247 mp->m_keylen = (int)STRLEN(mp->m_keys);
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
248 mp->m_noremap = noremap;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
249 mp->m_nowait = nowait;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
250 mp->m_silent = silent;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
251 mp->m_mode = mode;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
252 mp->m_simplified = simplified;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
253 #ifdef FEAT_EVAL
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
254 mp->m_expr = expr;
27223
ea2b4cb4515b patch 8.2.4140: maparg() does not indicate the type of script
Bram Moolenaar <Bram@vim.org>
parents: 27221
diff changeset
255 if (sid > 0)
20506
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
256 {
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
257 mp->m_script_ctx.sc_sid = sid;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
258 mp->m_script_ctx.sc_lnum = lnum;
27223
ea2b4cb4515b patch 8.2.4140: maparg() does not indicate the type of script
Bram Moolenaar <Bram@vim.org>
parents: 27221
diff changeset
259 mp->m_script_ctx.sc_version = scriptversion;
20506
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
260 }
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
261 else
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
262 {
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
263 mp->m_script_ctx = current_sctx;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
264 mp->m_script_ctx.sc_lnum += SOURCING_LNUM;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
265 }
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
266 #endif
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
267
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
268 // add the new entry in front of the abbrlist or maphash[] list
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
269 if (is_abbr)
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
270 {
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
271 mp->m_next = *abbr_table;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
272 *abbr_table = mp;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
273 }
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
274 else
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
275 {
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
276 int n = MAP_HASH(mp->m_mode, mp->m_keys[0]);
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
277
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
278 mp->m_next = map_table[n];
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
279 map_table[n] = mp;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
280 }
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
281 return OK;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
282 }
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
283
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
284 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
285 * map[!] : show all key mappings
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
286 * map[!] {lhs} : show key mapping for {lhs}
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
287 * map[!] {lhs} {rhs} : set key mapping for {lhs} to {rhs}
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
288 * noremap[!] {lhs} {rhs} : same, but no remapping for {rhs}
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
289 * unmap[!] {lhs} : remove key mapping for {lhs}
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
290 * abbr : show all abbreviations
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
291 * abbr {lhs} : show abbreviations for {lhs}
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
292 * abbr {lhs} {rhs} : set abbreviation for {lhs} to {rhs}
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
293 * noreabbr {lhs} {rhs} : same, but no remapping for {rhs}
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
294 * unabbr {lhs} : remove abbreviation for {lhs}
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
295 *
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
296 * maptype: 0 for :map, 1 for :unmap, 2 for noremap.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
297 *
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
298 * arg is pointer to any arguments. Note: arg cannot be a read-only string,
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
299 * it will be modified.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
300 *
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
301 * for :map mode is MODE_NORMAL | MODE_VISUAL | MODE_SELECT | MODE_OP_PENDING
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
302 * for :map! mode is MODE_INSERT | MODE_CMDLINE
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
303 * for :cmap mode is MODE_CMDLINE
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
304 * for :imap mode is MODE_INSERT
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
305 * for :lmap mode is MODE_LANGMAP
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
306 * for :nmap mode is MODE_NORMAL
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
307 * for :vmap mode is MODE_VISUAL | MODE_SELECT
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
308 * for :xmap mode is MODE_VISUAL
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
309 * for :smap mode is MODE_SELECT
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
310 * for :omap mode is MODE_OP_PENDING
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
311 * for :tmap mode is MODE_TERMINAL
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
312 *
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
313 * for :abbr mode is MODE_INSERT | MODE_CMDLINE
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
314 * for :iabbr mode is MODE_INSERT
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
315 * for :cabbr mode is MODE_CMDLINE
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
316 *
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
317 * Return 0 for success
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
318 * 1 for invalid arguments
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
319 * 2 for no match
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
320 * 4 for out of mem
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
321 * 5 for entry not unique
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
322 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
323 int
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
324 do_map(
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
325 int maptype,
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
326 char_u *arg,
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
327 int mode,
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
328 int abbrev) // not a mapping but an abbreviation
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
329 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
330 char_u *keys;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
331 mapblock_T *mp, **mpp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
332 char_u *rhs;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
333 char_u *p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
334 int n;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
335 int len = 0; // init for GCC
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
336 int hasarg;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
337 int haskey;
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
338 int do_print;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
339 int keyround;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
340 char_u *keys_buf = NULL;
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
341 char_u *alt_keys_buf = NULL;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
342 char_u *arg_buf = NULL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
343 int retval = 0;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
344 int do_backslash;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
345 mapblock_T **abbr_table;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
346 mapblock_T **map_table;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
347 int unique = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
348 int nowait = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
349 int silent = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
350 int special = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
351 #ifdef FEAT_EVAL
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
352 int expr = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
353 #endif
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
354 int did_simplify = FALSE;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
355 int noremap;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
356 char_u *orig_rhs;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
357
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
358 keys = arg;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
359 map_table = maphash;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
360 abbr_table = &first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
361
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
362 // For ":noremap" don't remap, otherwise do remap.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
363 if (maptype == 2)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
364 noremap = REMAP_NONE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
365 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
366 noremap = REMAP_YES;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
367
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
368 // Accept <buffer>, <nowait>, <silent>, <expr> <script> and <unique> in
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
369 // any order.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
370 for (;;)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
371 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
372 // Check for "<buffer>": mapping local to buffer.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
373 if (STRNCMP(keys, "<buffer>", 8) == 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
374 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
375 keys = skipwhite(keys + 8);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
376 map_table = curbuf->b_maphash;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
377 abbr_table = &curbuf->b_first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
378 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
379 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
380
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
381 // Check for "<nowait>": don't wait for more characters.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
382 if (STRNCMP(keys, "<nowait>", 8) == 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
383 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
384 keys = skipwhite(keys + 8);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
385 nowait = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
386 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
387 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
388
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
389 // Check for "<silent>": don't echo commands.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
390 if (STRNCMP(keys, "<silent>", 8) == 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
391 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
392 keys = skipwhite(keys + 8);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
393 silent = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
394 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
395 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
396
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
397 // Check for "<special>": accept special keys in <>
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
398 if (STRNCMP(keys, "<special>", 9) == 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
399 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
400 keys = skipwhite(keys + 9);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
401 special = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
402 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
403 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
404
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
405 #ifdef FEAT_EVAL
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
406 // Check for "<script>": remap script-local mappings only
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
407 if (STRNCMP(keys, "<script>", 8) == 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
408 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
409 keys = skipwhite(keys + 8);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
410 noremap = REMAP_SCRIPT;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
411 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
412 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
413
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
414 // Check for "<expr>": {rhs} is an expression.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
415 if (STRNCMP(keys, "<expr>", 6) == 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
416 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
417 keys = skipwhite(keys + 6);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
418 expr = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
419 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
420 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
421 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
422 // Check for "<unique>": don't overwrite an existing mapping.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
423 if (STRNCMP(keys, "<unique>", 8) == 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
424 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
425 keys = skipwhite(keys + 8);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
426 unique = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
427 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
428 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
429 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
430 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
431
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
432 validate_maphash();
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
433
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
434 // Find end of keys and skip CTRL-Vs (and backslashes) in it.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
435 // Accept backslash like CTRL-V when 'cpoptions' does not contain 'B'.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
436 // with :unmap white space is included in the keys, no argument possible.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
437 p = keys;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
438 do_backslash = (vim_strchr(p_cpo, CPO_BSLASH) == NULL);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
439 while (*p && (maptype == 1 || !VIM_ISWHITE(*p)))
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
440 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
441 if ((p[0] == Ctrl_V || (do_backslash && p[0] == '\\')) &&
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
442 p[1] != NUL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
443 ++p; // skip CTRL-V or backslash
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
444 ++p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
445 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
446 if (*p != NUL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
447 *p++ = NUL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
448
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
449 p = skipwhite(p);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
450 rhs = p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
451 hasarg = (*rhs != NUL);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
452 haskey = (*keys != NUL);
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
453 do_print = !haskey || (maptype != 1 && !hasarg);
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
454
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
455 // check for :unmap without argument
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
456 if (maptype == 1 && !haskey)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
457 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
458 retval = 1;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
459 goto theend;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
460 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
461
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
462 // If mapping has been given as ^V<C_UP> say, then replace the term codes
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
463 // with the appropriate two bytes. If it is a shifted special key, unshift
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
464 // it too, giving another two bytes.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
465 // replace_termcodes() may move the result to allocated memory, which
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
466 // needs to be freed later (*keys_buf and *arg_buf).
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
467 // replace_termcodes() also removes CTRL-Vs and sometimes backslashes.
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
468 // If something like <C-H> is simplified to 0x08 then mark it as simplified
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
469 // and also add a n entry with a modifier, which will work when
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
470 // modifyOtherKeys is working.
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
471 if (haskey)
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
472 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
473 char_u *new_keys;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
474 int flags = REPTERM_FROM_PART | REPTERM_DO_LT;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
475
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
476 if (special)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
477 flags |= REPTERM_SPECIAL;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
478 new_keys = replace_termcodes(keys, &keys_buf, flags, &did_simplify);
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
479 if (did_simplify)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
480 (void)replace_termcodes(keys, &alt_keys_buf,
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
481 flags | REPTERM_NO_SIMPLIFY, NULL);
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
482 keys = new_keys;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
483 }
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
484 orig_rhs = rhs;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
485 if (hasarg)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
486 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
487 if (STRICMP(rhs, "<nop>") == 0) // "<Nop>" means nothing
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
488 rhs = (char_u *)"";
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
489 else
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
490 rhs = replace_termcodes(rhs, &arg_buf,
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
491 REPTERM_DO_LT | (special ? REPTERM_SPECIAL : 0), NULL);
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
492 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
493
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
494 /*
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
495 * The following is done twice if we have two versions of keys:
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
496 * "alt_keys_buf" is not NULL.
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
497 */
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
498 for (keyround = 1; keyround <= 2; ++keyround)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
499 {
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
500 int did_it = FALSE;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
501 int did_local = FALSE;
28606
893af4a8fc08 patch 8.2.4827: typo in variable name
Bram Moolenaar <Bram@vim.org>
parents: 28602
diff changeset
502 int keyround1_simplified = keyround == 1 && did_simplify;
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
503 int round;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
504 int hash;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
505 int new_hash;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
506
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
507 if (keyround == 2)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
508 {
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
509 if (alt_keys_buf == NULL)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
510 break;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
511 keys = alt_keys_buf;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
512 }
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
513 else if (alt_keys_buf != NULL && do_print)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
514 // when printing always use the not-simplified map
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
515 keys = alt_keys_buf;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
516
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
517 // check arguments and translate function keys
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
518 if (haskey)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
519 {
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
520 len = (int)STRLEN(keys);
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
521 if (len > MAXMAPLEN) // maximum length of MAXMAPLEN chars
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
522 {
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
523 retval = 1;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
524 goto theend;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
525 }
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
526
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
527 if (abbrev && maptype != 1)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
528 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
529 // If an abbreviation ends in a keyword character, the
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
530 // rest must be all keyword-char or all non-keyword-char.
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
531 // Otherwise we won't be able to find the start of it in a
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
532 // vi-compatible way.
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
533 if (has_mbyte)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
534 {
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
535 int first, last;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
536 int same = -1;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
537
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
538 first = vim_iswordp(keys);
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
539 last = first;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
540 p = keys + (*mb_ptr2len)(keys);
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
541 n = 1;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
542 while (p < keys + len)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
543 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
544 ++n; // nr of (multi-byte) chars
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
545 last = vim_iswordp(p); // type of last char
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
546 if (same == -1 && last != first)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
547 same = n - 1; // count of same char type
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
548 p += (*mb_ptr2len)(p);
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
549 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
550 if (last && n > 2 && same >= 0 && same < n - 1)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
551 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
552 retval = 1;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
553 goto theend;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
554 }
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
555 }
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
556 else if (vim_iswordc(keys[len - 1]))
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
557 // ends in keyword char
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
558 for (n = 0; n < len - 2; ++n)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
559 if (vim_iswordc(keys[n]) != vim_iswordc(keys[len - 2]))
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
560 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
561 retval = 1;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
562 goto theend;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
563 }
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
564 // An abbreviation cannot contain white space.
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
565 for (n = 0; n < len; ++n)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
566 if (VIM_ISWHITE(keys[n]))
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
567 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
568 retval = 1;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
569 goto theend;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
570 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
571 }
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
572 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
573
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
574 if (haskey && hasarg && abbrev) // if we will add an abbreviation
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
575 no_abbr = FALSE; // reset flag that indicates there are
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
576 // no abbreviations
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
577
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
578 if (do_print)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
579 msg_start();
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
580
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
581 // Check if a new local mapping wasn't already defined globally.
20506
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
582 if (unique && map_table == curbuf->b_maphash
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
583 && haskey && hasarg && maptype != 1)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
584 {
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
585 // need to loop over all global hash lists
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
586 for (hash = 0; hash < 256 && !got_int; ++hash)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
587 {
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
588 if (abbrev)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
589 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
590 if (hash != 0) // there is only one abbreviation list
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
591 break;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
592 mp = first_abbr;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
593 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
594 else
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
595 mp = maphash[hash];
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
596 for ( ; mp != NULL && !got_int; mp = mp->m_next)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
597 {
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
598 // check entries with the same mode
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
599 if ((mp->m_mode & mode) != 0
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
600 && mp->m_keylen == len
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
601 && STRNCMP(mp->m_keys, keys, (size_t)len) == 0)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
602 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
603 if (abbrev)
26861
df2de1e63de0 patch 8.2.3959: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents: 26224
diff changeset
604 semsg(
df2de1e63de0 patch 8.2.3959: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents: 26224
diff changeset
605 _(e_global_abbreviation_already_exists_for_str),
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
606 mp->m_keys);
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
607 else
26861
df2de1e63de0 patch 8.2.3959: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents: 26224
diff changeset
608 semsg(_(e_global_mapping_already_exists_for_str),
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
609 mp->m_keys);
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
610 retval = 5;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
611 goto theend;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
612 }
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
613 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
614 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
615 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
616
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
617 // When listing global mappings, also list buffer-local ones here.
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
618 if (map_table != curbuf->b_maphash && !hasarg && maptype != 1)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
619 {
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
620 // need to loop over all global hash lists
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
621 for (hash = 0; hash < 256 && !got_int; ++hash)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
622 {
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
623 if (abbrev)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
624 {
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
625 if (hash != 0) // there is only one abbreviation list
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
626 break;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
627 mp = curbuf->b_first_abbr;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
628 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
629 else
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
630 mp = curbuf->b_maphash[hash];
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
631 for ( ; mp != NULL && !got_int; mp = mp->m_next)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
632 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
633 // check entries with the same mode
18329
1784afa654c8 patch 8.1.2159: some mappings are listed twice
Bram Moolenaar <Bram@vim.org>
parents: 18301
diff changeset
634 if (!mp->m_simplified && (mp->m_mode & mode) != 0)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
635 {
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
636 if (!haskey) // show all entries
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
637 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
638 showmap(mp, TRUE);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
639 did_local = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
640 }
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
641 else
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
642 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
643 n = mp->m_keylen;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
644 if (STRNCMP(mp->m_keys, keys,
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
645 (size_t)(n < len ? n : len)) == 0)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
646 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
647 showmap(mp, TRUE);
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
648 did_local = TRUE;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
649 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
650 }
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
651 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
652 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
653 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
654 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
655
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
656 // Find an entry in the maphash[] list that matches.
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
657 // For :unmap we may loop two times: once to try to unmap an entry with
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
658 // a matching 'from' part, a second time, if the first fails, to unmap
26224
7d66d585bffa patch 8.2.3643: header for source file is outdated
Bram Moolenaar <Bram@vim.org>
parents: 25431
diff changeset
659 // an entry with a matching 'to' part. This was done to allow
7d66d585bffa patch 8.2.3643: header for source file is outdated
Bram Moolenaar <Bram@vim.org>
parents: 25431
diff changeset
660 // ":ab foo bar" to be unmapped by typing ":unab foo", where "foo" will
7d66d585bffa patch 8.2.3643: header for source file is outdated
Bram Moolenaar <Bram@vim.org>
parents: 25431
diff changeset
661 // be replaced by "bar" because of the abbreviation.
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
662 for (round = 0; (round == 0 || maptype == 1) && round <= 1
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
663 && !did_it && !got_int; ++round)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
664 {
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
665 // need to loop over all hash lists
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
666 for (hash = 0; hash < 256 && !got_int; ++hash)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
667 {
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
668 if (abbrev)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
669 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
670 if (hash > 0) // there is only one abbreviation list
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
671 break;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
672 mpp = abbr_table;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
673 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
674 else
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
675 mpp = &(map_table[hash]);
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
676 for (mp = *mpp; mp != NULL && !got_int; mp = *mpp)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
677 {
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
678
18329
1784afa654c8 patch 8.1.2159: some mappings are listed twice
Bram Moolenaar <Bram@vim.org>
parents: 18301
diff changeset
679 if ((mp->m_mode & mode) == 0)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
680 {
18329
1784afa654c8 patch 8.1.2159: some mappings are listed twice
Bram Moolenaar <Bram@vim.org>
parents: 18301
diff changeset
681 // skip entries with wrong mode
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
682 mpp = &(mp->m_next);
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
683 continue;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
684 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
685 if (!haskey) // show all entries
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
686 {
18329
1784afa654c8 patch 8.1.2159: some mappings are listed twice
Bram Moolenaar <Bram@vim.org>
parents: 18301
diff changeset
687 if (!mp->m_simplified)
1784afa654c8 patch 8.1.2159: some mappings are listed twice
Bram Moolenaar <Bram@vim.org>
parents: 18301
diff changeset
688 {
1784afa654c8 patch 8.1.2159: some mappings are listed twice
Bram Moolenaar <Bram@vim.org>
parents: 18301
diff changeset
689 showmap(mp, map_table != maphash);
1784afa654c8 patch 8.1.2159: some mappings are listed twice
Bram Moolenaar <Bram@vim.org>
parents: 18301
diff changeset
690 did_it = TRUE;
1784afa654c8 patch 8.1.2159: some mappings are listed twice
Bram Moolenaar <Bram@vim.org>
parents: 18301
diff changeset
691 }
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
692 }
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
693 else // do we have a match?
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
694 {
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
695 if (round) // second round: Try unmap "rhs" string
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
696 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
697 n = (int)STRLEN(mp->m_str);
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
698 p = mp->m_str;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
699 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
700 else
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
701 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
702 n = mp->m_keylen;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
703 p = mp->m_keys;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
704 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
705 if (STRNCMP(p, keys, (size_t)(n < len ? n : len)) == 0)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
706 {
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
707 if (maptype == 1)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
708 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
709 // Delete entry.
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
710 // Only accept a full match. For abbreviations
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
711 // we ignore trailing space when matching with
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
712 // the "lhs", since an abbreviation can't have
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
713 // trailing space.
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
714 if (n != len && (!abbrev || round || n > len
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
715 || *skipwhite(keys + n) != NUL))
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
716 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
717 mpp = &(mp->m_next);
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
718 continue;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
719 }
28608
9ae7ccd90041 patch 8.2.4828: fix for unmapping simplified key not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 28606
diff changeset
720 // In keyround for simplified keys, don't unmap
9ae7ccd90041 patch 8.2.4828: fix for unmapping simplified key not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 28606
diff changeset
721 // a mapping without m_simplified flag.
28606
893af4a8fc08 patch 8.2.4827: typo in variable name
Bram Moolenaar <Bram@vim.org>
parents: 28602
diff changeset
722 if (keyround1_simplified && !mp->m_simplified)
28590
86bf2dabc93a patch 8.2.4819: unmapping simplified keys also deletes other mapping
Bram Moolenaar <Bram@vim.org>
parents: 27916
diff changeset
723 break;
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
724 // We reset the indicated mode bits. If nothing
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
725 // is left the entry is deleted below.
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
726 mp->m_mode &= ~mode;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
727 did_it = TRUE; // remember we did something
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
728 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
729 else if (!hasarg) // show matching entry
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
730 {
18329
1784afa654c8 patch 8.1.2159: some mappings are listed twice
Bram Moolenaar <Bram@vim.org>
parents: 18301
diff changeset
731 if (!mp->m_simplified)
1784afa654c8 patch 8.1.2159: some mappings are listed twice
Bram Moolenaar <Bram@vim.org>
parents: 18301
diff changeset
732 {
1784afa654c8 patch 8.1.2159: some mappings are listed twice
Bram Moolenaar <Bram@vim.org>
parents: 18301
diff changeset
733 showmap(mp, map_table != maphash);
1784afa654c8 patch 8.1.2159: some mappings are listed twice
Bram Moolenaar <Bram@vim.org>
parents: 18301
diff changeset
734 did_it = TRUE;
1784afa654c8 patch 8.1.2159: some mappings are listed twice
Bram Moolenaar <Bram@vim.org>
parents: 18301
diff changeset
735 }
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
736 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
737 else if (n != len) // new entry is ambiguous
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
738 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
739 mpp = &(mp->m_next);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
740 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
741 }
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
742 else if (unique)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
743 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
744 if (abbrev)
26861
df2de1e63de0 patch 8.2.3959: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents: 26224
diff changeset
745 semsg(
df2de1e63de0 patch 8.2.3959: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents: 26224
diff changeset
746 _(e_abbreviation_already_exists_for_str),
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
747 p);
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
748 else
26861
df2de1e63de0 patch 8.2.3959: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents: 26224
diff changeset
749 semsg(_(e_mapping_already_exists_for_str),
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
750 p);
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
751 retval = 5;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
752 goto theend;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
753 }
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
754 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
755 {
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
756 // new rhs for existing entry
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
757 mp->m_mode &= ~mode; // remove mode bits
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
758 if (mp->m_mode == 0 && !did_it) // reuse entry
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
759 {
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
760 char_u *newstr = vim_strsave(rhs);
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
761
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
762 if (newstr == NULL)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
763 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
764 retval = 4; // no mem
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
765 goto theend;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
766 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
767 vim_free(mp->m_str);
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
768 mp->m_str = newstr;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
769 vim_free(mp->m_orig_str);
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
770 mp->m_orig_str = vim_strsave(orig_rhs);
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
771 mp->m_noremap = noremap;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
772 mp->m_nowait = nowait;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
773 mp->m_silent = silent;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
774 mp->m_mode = mode;
28606
893af4a8fc08 patch 8.2.4827: typo in variable name
Bram Moolenaar <Bram@vim.org>
parents: 28602
diff changeset
775 mp->m_simplified = keyround1_simplified;
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
776 #ifdef FEAT_EVAL
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
777 mp->m_expr = expr;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
778 mp->m_script_ctx = current_sctx;
18991
847cc7932c42 patch 8.2.0056: execution stack is incomplete and inefficient
Bram Moolenaar <Bram@vim.org>
parents: 18498
diff changeset
779 mp->m_script_ctx.sc_lnum += SOURCING_LNUM;
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
780 #endif
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
781 did_it = TRUE;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
782 }
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
783 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
784 if (mp->m_mode == 0) // entry can be deleted
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
785 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
786 map_free(mpp);
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
787 continue; // continue with *mpp
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
788 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
789
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
790 // May need to put this entry into another hash
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
791 // list.
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
792 new_hash = MAP_HASH(mp->m_mode, mp->m_keys[0]);
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
793 if (!abbrev && new_hash != hash)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
794 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
795 *mpp = mp->m_next;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
796 mp->m_next = map_table[new_hash];
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
797 map_table[new_hash] = mp;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
798
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
799 continue; // continue with *mpp
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
800 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
801 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
802 }
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
803 mpp = &(mp->m_next);
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
804 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
805 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
806 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
807
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
808 if (maptype == 1)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
809 {
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
810 // delete entry
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
811 if (!did_it)
28590
86bf2dabc93a patch 8.2.4819: unmapping simplified keys also deletes other mapping
Bram Moolenaar <Bram@vim.org>
parents: 27916
diff changeset
812 {
28606
893af4a8fc08 patch 8.2.4827: typo in variable name
Bram Moolenaar <Bram@vim.org>
parents: 28602
diff changeset
813 if (!keyround1_simplified)
28590
86bf2dabc93a patch 8.2.4819: unmapping simplified keys also deletes other mapping
Bram Moolenaar <Bram@vim.org>
parents: 27916
diff changeset
814 retval = 2; // no match
86bf2dabc93a patch 8.2.4819: unmapping simplified keys also deletes other mapping
Bram Moolenaar <Bram@vim.org>
parents: 27916
diff changeset
815 }
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
816 else if (*keys == Ctrl_C)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
817 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
818 // If CTRL-C has been unmapped, reuse it for Interrupting.
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
819 if (map_table == curbuf->b_maphash)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
820 curbuf->b_mapped_ctrl_c &= ~mode;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
821 else
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
822 mapped_ctrl_c &= ~mode;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
823 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
824 continue;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
825 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
826
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
827 if (!haskey || !hasarg)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
828 {
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
829 // print entries
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
830 if (!did_it && !did_local)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
831 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
832 if (abbrev)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
833 msg(_("No abbreviation found"));
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
834 else
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
835 msg(_("No mapping found"));
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
836 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
837 goto theend; // listing finished
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
838 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
839
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
840 if (did_it)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
841 continue; // have added the new entry already
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
842
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
843 // Get here when adding a new entry to the maphash[] list or abbrlist.
20510
3d9a2c8d4f95 patch 8.2.0809: build failure with small features
Bram Moolenaar <Bram@vim.org>
parents: 20506
diff changeset
844 if (map_add(map_table, abbr_table, keys, rhs, orig_rhs,
3d9a2c8d4f95 patch 8.2.0809: build failure with small features
Bram Moolenaar <Bram@vim.org>
parents: 20506
diff changeset
845 noremap, nowait, silent, mode, abbrev,
20506
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
846 #ifdef FEAT_EVAL
27223
ea2b4cb4515b patch 8.2.4140: maparg() does not indicate the type of script
Bram Moolenaar <Bram@vim.org>
parents: 27221
diff changeset
847 expr, /* sid */ -1, /* scriptversion */ 0, /* lnum */ 0,
20506
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
848 #endif
28606
893af4a8fc08 patch 8.2.4827: typo in variable name
Bram Moolenaar <Bram@vim.org>
parents: 28602
diff changeset
849 keyround1_simplified) == FAIL)
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
850 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
851 retval = 4; // no mem
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
852 goto theend;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
853 }
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
854 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
855
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
856 theend:
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
857 vim_free(keys_buf);
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
858 vim_free(alt_keys_buf);
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
859 vim_free(arg_buf);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
860 return retval;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
861 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
862
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
863 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
864 * Get the mapping mode from the command name.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
865 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
866 static int
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
867 get_map_mode(char_u **cmdp, int forceit)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
868 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
869 char_u *p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
870 int modec;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
871 int mode;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
872
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
873 p = *cmdp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
874 modec = *p++;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
875 if (modec == 'i')
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
876 mode = MODE_INSERT; // :imap
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
877 else if (modec == 'l')
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
878 mode = MODE_LANGMAP; // :lmap
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
879 else if (modec == 'c')
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
880 mode = MODE_CMDLINE; // :cmap
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
881 else if (modec == 'n' && *p != 'o') // avoid :noremap
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
882 mode = MODE_NORMAL; // :nmap
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
883 else if (modec == 'v')
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
884 mode = MODE_VISUAL | MODE_SELECT; // :vmap
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
885 else if (modec == 'x')
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
886 mode = MODE_VISUAL; // :xmap
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
887 else if (modec == 's')
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
888 mode = MODE_SELECT; // :smap
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
889 else if (modec == 'o')
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
890 mode = MODE_OP_PENDING; // :omap
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
891 else if (modec == 't')
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
892 mode = MODE_TERMINAL; // :tmap
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
893 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
894 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
895 --p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
896 if (forceit)
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
897 mode = MODE_INSERT | MODE_CMDLINE; // :map !
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
898 else
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
899 mode = MODE_VISUAL | MODE_SELECT | MODE_NORMAL | MODE_OP_PENDING;
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
900 // :map
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
901 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
902
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
903 *cmdp = p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
904 return mode;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
905 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
906
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
907 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
908 * Clear all mappings or abbreviations.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
909 * 'abbr' should be FALSE for mappings, TRUE for abbreviations.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
910 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
911 static void
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
912 map_clear(
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
913 char_u *cmdp,
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
914 char_u *arg UNUSED,
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
915 int forceit,
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
916 int abbr)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
917 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
918 int mode;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
919 int local;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
920
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
921 local = (STRCMP(arg, "<buffer>") == 0);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
922 if (!local && *arg != NUL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
923 {
26865
bce848ec8b1b patch 8.2.3961: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents: 26861
diff changeset
924 emsg(_(e_invalid_argument));
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
925 return;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
926 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
927
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
928 mode = get_map_mode(&cmdp, forceit);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
929 map_clear_int(curbuf, mode, local, abbr);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
930 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
931
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
932 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
933 * Clear all mappings in "mode".
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
934 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
935 void
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
936 map_clear_int(
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
937 buf_T *buf, // buffer for local mappings
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
938 int mode, // mode in which to delete
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
939 int local, // TRUE for buffer-local mappings
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
940 int abbr) // TRUE for abbreviations
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
941 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
942 mapblock_T *mp, **mpp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
943 int hash;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
944 int new_hash;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
945
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
946 validate_maphash();
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
947
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
948 for (hash = 0; hash < 256; ++hash)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
949 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
950 if (abbr)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
951 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
952 if (hash > 0) // there is only one abbrlist
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
953 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
954 if (local)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
955 mpp = &buf->b_first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
956 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
957 mpp = &first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
958 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
959 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
960 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
961 if (local)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
962 mpp = &buf->b_maphash[hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
963 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
964 mpp = &maphash[hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
965 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
966 while (*mpp != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
967 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
968 mp = *mpp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
969 if (mp->m_mode & mode)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
970 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
971 mp->m_mode &= ~mode;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
972 if (mp->m_mode == 0) // entry can be deleted
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
973 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
974 map_free(mpp);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
975 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
976 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
977 // May need to put this entry into another hash list.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
978 new_hash = MAP_HASH(mp->m_mode, mp->m_keys[0]);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
979 if (!abbr && new_hash != hash)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
980 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
981 *mpp = mp->m_next;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
982 if (local)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
983 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
984 mp->m_next = buf->b_maphash[new_hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
985 buf->b_maphash[new_hash] = mp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
986 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
987 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
988 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
989 mp->m_next = maphash[new_hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
990 maphash[new_hash] = mp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
991 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
992 continue; // continue with *mpp
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
993 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
994 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
995 mpp = &(mp->m_next);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
996 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
997 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
998 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
999
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1000 #if defined(FEAT_EVAL) || defined(PROTO)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1001 int
17946
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes
Bram Moolenaar <Bram@vim.org>
parents: 17940
diff changeset
1002 mode_str2flags(char_u *modechars)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1003 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1004 int mode = 0;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1005
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1006 if (vim_strchr(modechars, 'n') != NULL)
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1007 mode |= MODE_NORMAL;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1008 if (vim_strchr(modechars, 'v') != NULL)
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1009 mode |= MODE_VISUAL | MODE_SELECT;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1010 if (vim_strchr(modechars, 'x') != NULL)
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1011 mode |= MODE_VISUAL;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1012 if (vim_strchr(modechars, 's') != NULL)
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1013 mode |= MODE_SELECT;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1014 if (vim_strchr(modechars, 'o') != NULL)
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1015 mode |= MODE_OP_PENDING;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1016 if (vim_strchr(modechars, 'i') != NULL)
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1017 mode |= MODE_INSERT;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1018 if (vim_strchr(modechars, 'l') != NULL)
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1019 mode |= MODE_LANGMAP;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1020 if (vim_strchr(modechars, 'c') != NULL)
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1021 mode |= MODE_CMDLINE;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1022
17946
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes
Bram Moolenaar <Bram@vim.org>
parents: 17940
diff changeset
1023 return mode;
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes
Bram Moolenaar <Bram@vim.org>
parents: 17940
diff changeset
1024 }
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes
Bram Moolenaar <Bram@vim.org>
parents: 17940
diff changeset
1025
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes
Bram Moolenaar <Bram@vim.org>
parents: 17940
diff changeset
1026 /*
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes
Bram Moolenaar <Bram@vim.org>
parents: 17940
diff changeset
1027 * Return TRUE if a map exists that has "str" in the rhs for mode "modechars".
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes
Bram Moolenaar <Bram@vim.org>
parents: 17940
diff changeset
1028 * Recognize termcap codes in "str".
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes
Bram Moolenaar <Bram@vim.org>
parents: 17940
diff changeset
1029 * Also checks mappings local to the current buffer.
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes
Bram Moolenaar <Bram@vim.org>
parents: 17940
diff changeset
1030 */
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes
Bram Moolenaar <Bram@vim.org>
parents: 17940
diff changeset
1031 int
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes
Bram Moolenaar <Bram@vim.org>
parents: 17940
diff changeset
1032 map_to_exists(char_u *str, char_u *modechars, int abbr)
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes
Bram Moolenaar <Bram@vim.org>
parents: 17940
diff changeset
1033 {
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes
Bram Moolenaar <Bram@vim.org>
parents: 17940
diff changeset
1034 char_u *rhs;
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes
Bram Moolenaar <Bram@vim.org>
parents: 17940
diff changeset
1035 char_u *buf;
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes
Bram Moolenaar <Bram@vim.org>
parents: 17940
diff changeset
1036 int retval;
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes
Bram Moolenaar <Bram@vim.org>
parents: 17940
diff changeset
1037
18301
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Bram Moolenaar <Bram@vim.org>
parents: 17946
diff changeset
1038 rhs = replace_termcodes(str, &buf, REPTERM_DO_LT, NULL);
17946
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes
Bram Moolenaar <Bram@vim.org>
parents: 17940
diff changeset
1039
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes
Bram Moolenaar <Bram@vim.org>
parents: 17940
diff changeset
1040 retval = map_to_exists_mode(rhs, mode_str2flags(modechars), abbr);
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1041 vim_free(buf);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1042
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1043 return retval;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1044 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1045 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1046
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1047 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1048 * Return TRUE if a map exists that has "str" in the rhs for mode "mode".
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1049 * Also checks mappings local to the current buffer.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1050 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1051 int
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1052 map_to_exists_mode(char_u *rhs, int mode, int abbr)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1053 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1054 mapblock_T *mp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1055 int hash;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1056 int exp_buffer = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1057
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1058 validate_maphash();
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1059
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1060 // Do it twice: once for global maps and once for local maps.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1061 for (;;)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1062 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1063 for (hash = 0; hash < 256; ++hash)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1064 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1065 if (abbr)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1066 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1067 if (hash > 0) // there is only one abbr list
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1068 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1069 if (exp_buffer)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1070 mp = curbuf->b_first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1071 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1072 mp = first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1073 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1074 else if (exp_buffer)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1075 mp = curbuf->b_maphash[hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1076 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1077 mp = maphash[hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1078 for (; mp; mp = mp->m_next)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1079 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1080 if ((mp->m_mode & mode)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1081 && strstr((char *)mp->m_str, (char *)rhs) != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1082 return TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1083 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1084 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1085 if (exp_buffer)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1086 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1087 exp_buffer = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1088 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1089
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1090 return FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1091 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1092
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1093 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1094 * Used below when expanding mapping/abbreviation names.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1095 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1096 static int expand_mapmodes = 0;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1097 static int expand_isabbrev = 0;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1098 static int expand_buffer = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1099
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1100 /*
19178
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1101 * Translate an internal mapping/abbreviation representation into the
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1102 * corresponding external one recognized by :map/:abbrev commands.
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1103 * Respects the current B/k/< settings of 'cpoption'.
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1104 *
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1105 * This function is called when expanding mappings/abbreviations on the
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1106 * command-line.
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1107 *
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1108 * It uses a growarray to build the translation string since the latter can be
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1109 * wider than the original description. The caller has to free the string
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1110 * afterwards.
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1111 *
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1112 * Returns NULL when there is a problem.
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1113 */
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1114 static char_u *
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1115 translate_mapping(char_u *str)
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1116 {
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1117 garray_T ga;
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1118 int c;
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1119 int modifiers;
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1120 int cpo_bslash;
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1121 int cpo_special;
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1122
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1123 ga_init(&ga);
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1124 ga.ga_itemsize = 1;
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1125 ga.ga_growsize = 40;
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1126
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1127 cpo_bslash = (vim_strchr(p_cpo, CPO_BSLASH) != NULL);
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1128 cpo_special = (vim_strchr(p_cpo, CPO_SPECI) != NULL);
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1129
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1130 for (; *str; ++str)
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1131 {
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1132 c = *str;
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1133 if (c == K_SPECIAL && str[1] != NUL && str[2] != NUL)
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1134 {
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1135 modifiers = 0;
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1136 if (str[1] == KS_MODIFIER)
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1137 {
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1138 str++;
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1139 modifiers = *++str;
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1140 c = *++str;
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1141 }
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1142 if (c == K_SPECIAL && str[1] != NUL && str[2] != NUL)
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1143 {
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1144 if (cpo_special)
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1145 {
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1146 ga_clear(&ga);
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1147 return NULL;
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1148 }
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1149 c = TO_SPECIAL(str[1], str[2]);
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1150 if (c == K_ZERO) // display <Nul> as ^@
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1151 c = NUL;
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1152 str += 2;
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1153 }
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1154 if (IS_SPECIAL(c) || modifiers) // special key
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1155 {
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1156 if (cpo_special)
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1157 {
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1158 ga_clear(&ga);
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1159 return NULL;
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1160 }
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1161 ga_concat(&ga, get_special_key_name(c, modifiers));
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1162 continue; // for (str)
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1163 }
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1164 }
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1165 if (c == ' ' || c == '\t' || c == Ctrl_J || c == Ctrl_V
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1166 || (c == '<' && !cpo_special) || (c == '\\' && !cpo_bslash))
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1167 ga_append(&ga, cpo_bslash ? Ctrl_V : '\\');
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1168 if (c)
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1169 ga_append(&ga, c);
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1170 }
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1171 ga_append(&ga, NUL);
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1172 return (char_u *)(ga.ga_data);
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1173 }
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1174
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file
Bram Moolenaar <Bram@vim.org>
parents: 19075
diff changeset
1175 /*
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1176 * Work out what to complete when doing command line completion of mapping
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1177 * or abbreviation names.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1178 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1179 char_u *
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1180 set_context_in_map_cmd(
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1181 expand_T *xp,
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1182 char_u *cmd,
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1183 char_u *arg,
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1184 int forceit, // TRUE if '!' given
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1185 int isabbrev, // TRUE if abbreviation
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1186 int isunmap, // TRUE if unmap/unabbrev command
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1187 cmdidx_T cmdidx)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1188 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1189 if (forceit && cmdidx != CMD_map && cmdidx != CMD_unmap)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1190 xp->xp_context = EXPAND_NOTHING;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1191 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1192 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1193 if (isunmap)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1194 expand_mapmodes = get_map_mode(&cmd, forceit || isabbrev);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1195 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1196 {
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1197 expand_mapmodes = MODE_INSERT | MODE_CMDLINE;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1198 if (!isabbrev)
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1199 expand_mapmodes += MODE_VISUAL | MODE_SELECT | MODE_NORMAL
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1200 | MODE_OP_PENDING;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1201 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1202 expand_isabbrev = isabbrev;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1203 xp->xp_context = EXPAND_MAPPINGS;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1204 expand_buffer = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1205 for (;;)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1206 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1207 if (STRNCMP(arg, "<buffer>", 8) == 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1208 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1209 expand_buffer = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1210 arg = skipwhite(arg + 8);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1211 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1212 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1213 if (STRNCMP(arg, "<unique>", 8) == 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1214 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1215 arg = skipwhite(arg + 8);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1216 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1217 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1218 if (STRNCMP(arg, "<nowait>", 8) == 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1219 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1220 arg = skipwhite(arg + 8);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1221 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1222 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1223 if (STRNCMP(arg, "<silent>", 8) == 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1224 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1225 arg = skipwhite(arg + 8);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1226 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1227 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1228 if (STRNCMP(arg, "<special>", 9) == 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1229 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1230 arg = skipwhite(arg + 9);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1231 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1232 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1233 #ifdef FEAT_EVAL
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1234 if (STRNCMP(arg, "<script>", 8) == 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1235 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1236 arg = skipwhite(arg + 8);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1237 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1238 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1239 if (STRNCMP(arg, "<expr>", 6) == 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1240 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1241 arg = skipwhite(arg + 6);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1242 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1243 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1244 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1245 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1246 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1247 xp->xp_pattern = arg;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1248 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1249
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1250 return NULL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1251 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1252
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1253 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1254 * Find all mapping/abbreviation names that match regexp "regmatch"'.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1255 * For command line expansion of ":[un]map" and ":[un]abbrev" in all modes.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1256 * Return OK if matches found, FAIL otherwise.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1257 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1258 int
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1259 ExpandMappings(
27908
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations
Bram Moolenaar <Bram@vim.org>
parents: 27750
diff changeset
1260 char_u *pat,
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1261 regmatch_T *regmatch,
27908
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations
Bram Moolenaar <Bram@vim.org>
parents: 27750
diff changeset
1262 int *numMatches,
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations
Bram Moolenaar <Bram@vim.org>
parents: 27750
diff changeset
1263 char_u ***matches)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1264 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1265 mapblock_T *mp;
27916
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1266 garray_T ga;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1267 int hash;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1268 int count;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1269 char_u *p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1270 int i;
27908
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations
Bram Moolenaar <Bram@vim.org>
parents: 27750
diff changeset
1271 int fuzzy;
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations
Bram Moolenaar <Bram@vim.org>
parents: 27750
diff changeset
1272 int match;
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations
Bram Moolenaar <Bram@vim.org>
parents: 27750
diff changeset
1273 int score;
27916
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1274 fuzmatch_str_T *fuzmatch;
27908
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations
Bram Moolenaar <Bram@vim.org>
parents: 27750
diff changeset
1275
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations
Bram Moolenaar <Bram@vim.org>
parents: 27750
diff changeset
1276 fuzzy = cmdline_fuzzy_complete(pat);
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1277
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1278 validate_maphash();
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1279
27908
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations
Bram Moolenaar <Bram@vim.org>
parents: 27750
diff changeset
1280 *numMatches = 0; // return values in case of FAIL
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations
Bram Moolenaar <Bram@vim.org>
parents: 27750
diff changeset
1281 *matches = NULL;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1282
27916
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1283 if (!fuzzy)
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1284 ga_init2(&ga, sizeof(char *), 3);
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1285 else
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1286 ga_init2(&ga, sizeof(fuzmatch_str_T), 3);
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1287
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1288 // First search in map modifier arguments
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1289 for (i = 0; i < 7; ++i)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1290 {
27916
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1291 if (i == 0)
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1292 p = (char_u *)"<silent>";
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1293 else if (i == 1)
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1294 p = (char_u *)"<unique>";
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1295 #ifdef FEAT_EVAL
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1296 else if (i == 2)
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1297 p = (char_u *)"<script>";
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1298 else if (i == 3)
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1299 p = (char_u *)"<expr>";
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1300 #endif
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1301 else if (i == 4 && !expand_buffer)
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1302 p = (char_u *)"<buffer>";
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1303 else if (i == 5)
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1304 p = (char_u *)"<nowait>";
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1305 else if (i == 6)
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1306 p = (char_u *)"<special>";
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1307 else
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1308 continue;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1309
27916
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1310 if (!fuzzy)
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1311 match = vim_regexec(regmatch, p, (colnr_T)0);
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1312 else
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1313 {
27916
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1314 score = fuzzy_match_str(p, pat);
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1315 match = (score != 0);
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1316 }
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1317
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1318 if (!match)
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1319 continue;
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1320
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1321 if (ga_grow(&ga, 1) == FAIL)
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1322 break;
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1323
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1324 if (fuzzy)
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1325 {
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1326 fuzmatch = &((fuzmatch_str_T *)ga.ga_data)[ga.ga_len];
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1327 fuzmatch->idx = ga.ga_len;
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1328 fuzmatch->str = vim_strsave(p);
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1329 fuzmatch->score = score;
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1330 }
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1331 else
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1332 ((char_u **)ga.ga_data)[ga.ga_len] = vim_strsave(p);
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1333 ++ga.ga_len;
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1334 }
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1335
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1336 for (hash = 0; hash < 256; ++hash)
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1337 {
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1338 if (expand_isabbrev)
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1339 {
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1340 if (hash > 0) // only one abbrev list
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1341 break; // for (hash)
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1342 mp = first_abbr;
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1343 }
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1344 else if (expand_buffer)
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1345 mp = curbuf->b_maphash[hash];
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1346 else
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1347 mp = maphash[hash];
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1348 for (; mp; mp = mp->m_next)
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1349 {
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1350 if (!(mp->m_mode & expand_mapmodes))
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1351 continue;
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1352
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1353 p = translate_mapping(mp->m_keys);
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1354 if (p == NULL)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1355 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1356
27908
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations
Bram Moolenaar <Bram@vim.org>
parents: 27750
diff changeset
1357 if (!fuzzy)
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations
Bram Moolenaar <Bram@vim.org>
parents: 27750
diff changeset
1358 match = vim_regexec(regmatch, p, (colnr_T)0);
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations
Bram Moolenaar <Bram@vim.org>
parents: 27750
diff changeset
1359 else
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1360 {
27908
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations
Bram Moolenaar <Bram@vim.org>
parents: 27750
diff changeset
1361 score = fuzzy_match_str(p, pat);
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations
Bram Moolenaar <Bram@vim.org>
parents: 27750
diff changeset
1362 match = (score != 0);
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations
Bram Moolenaar <Bram@vim.org>
parents: 27750
diff changeset
1363 }
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations
Bram Moolenaar <Bram@vim.org>
parents: 27750
diff changeset
1364
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations
Bram Moolenaar <Bram@vim.org>
parents: 27750
diff changeset
1365 if (!match)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1366 {
27916
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1367 vim_free(p);
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1368 continue;
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1369 }
27908
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations
Bram Moolenaar <Bram@vim.org>
parents: 27750
diff changeset
1370
27916
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1371 if (ga_grow(&ga, 1) == FAIL)
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1372 {
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1373 vim_free(p);
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1374 break;
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1375 }
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1376
27908
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations
Bram Moolenaar <Bram@vim.org>
parents: 27750
diff changeset
1377 if (fuzzy)
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations
Bram Moolenaar <Bram@vim.org>
parents: 27750
diff changeset
1378 {
27916
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1379 fuzmatch = &((fuzmatch_str_T *)ga.ga_data)[ga.ga_len];
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1380 fuzmatch->idx = ga.ga_len;
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1381 fuzmatch->str = p;
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1382 fuzmatch->score = score;
27908
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations
Bram Moolenaar <Bram@vim.org>
parents: 27750
diff changeset
1383 }
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations
Bram Moolenaar <Bram@vim.org>
parents: 27750
diff changeset
1384 else
27916
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1385 ((char_u **)ga.ga_data)[ga.ga_len] = p;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1386
27916
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1387 ++ga.ga_len;
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1388 } // for (mp)
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1389 } // for (hash)
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1390
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1391 if (ga.ga_len == 0)
27908
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations
Bram Moolenaar <Bram@vim.org>
parents: 27750
diff changeset
1392 return FAIL;
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations
Bram Moolenaar <Bram@vim.org>
parents: 27750
diff changeset
1393
27916
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1394 if (!fuzzy)
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1395 {
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1396 *matches = ga.ga_data;
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1397 *numMatches = ga.ga_len;
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1398 }
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1399 else
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1400 {
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1401 if (fuzzymatches_to_strmatches(ga.ga_data, matches, ga.ga_len,
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1402 FALSE) == FAIL)
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1403 return FAIL;
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1404 *numMatches = ga.ga_len;
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1405 }
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1406
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches
Bram Moolenaar <Bram@vim.org>
parents: 27908
diff changeset
1407 count = *numMatches;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1408 if (count > 1)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1409 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1410 char_u **ptr1;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1411 char_u **ptr2;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1412 char_u **ptr3;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1413
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1414 // Sort the matches
27908
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations
Bram Moolenaar <Bram@vim.org>
parents: 27750
diff changeset
1415 // Fuzzy matching already sorts the matches
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations
Bram Moolenaar <Bram@vim.org>
parents: 27750
diff changeset
1416 if (!fuzzy)
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations
Bram Moolenaar <Bram@vim.org>
parents: 27750
diff changeset
1417 sort_strings(*matches, count);
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1418
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1419 // Remove multiple entries
27908
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations
Bram Moolenaar <Bram@vim.org>
parents: 27750
diff changeset
1420 ptr1 = *matches;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1421 ptr2 = ptr1 + 1;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1422 ptr3 = ptr1 + count;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1423
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1424 while (ptr2 < ptr3)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1425 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1426 if (STRCMP(*ptr1, *ptr2))
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1427 *++ptr1 = *ptr2++;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1428 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1429 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1430 vim_free(*ptr2++);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1431 count--;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1432 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1433 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1434 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1435
27908
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations
Bram Moolenaar <Bram@vim.org>
parents: 27750
diff changeset
1436 *numMatches = count;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1437 return (count == 0 ? FAIL : OK);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1438 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1439
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1440 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1441 * Check for an abbreviation.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1442 * Cursor is at ptr[col].
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1443 * When inserting, mincol is where insert started.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1444 * For the command line, mincol is what is to be skipped over.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1445 * "c" is the character typed before check_abbr was called. It may have
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1446 * ABBR_OFF added to avoid prepending a CTRL-V to it.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1447 *
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1448 * Historic vi practice: The last character of an abbreviation must be an id
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1449 * character ([a-zA-Z0-9_]). The characters in front of it must be all id
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1450 * characters or all non-id characters. This allows for abbr. "#i" to
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1451 * "#include".
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1452 *
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1453 * Vim addition: Allow for abbreviations that end in a non-keyword character.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1454 * Then there must be white space before the abbr.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1455 *
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1456 * return TRUE if there is an abbreviation, FALSE if not
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1457 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1458 int
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1459 check_abbr(
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1460 int c,
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1461 char_u *ptr,
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1462 int col,
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1463 int mincol)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1464 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1465 int len;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1466 int scol; // starting column of the abbr.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1467 int j;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1468 char_u *s;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1469 char_u tb[MB_MAXBYTES + 4];
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1470 mapblock_T *mp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1471 mapblock_T *mp2;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1472 int clen = 0; // length in characters
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1473 int is_id = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1474 int vim_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1475
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1476 if (typebuf.tb_no_abbr_cnt) // abbrev. are not recursive
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1477 return FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1478
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1479 // no remapping implies no abbreviation, except for CTRL-]
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1480 if (noremap_keys() && c != Ctrl_RSB)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1481 return FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1482
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1483 // Check for word before the cursor: If it ends in a keyword char all
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1484 // chars before it must be keyword chars or non-keyword chars, but not
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1485 // white space. If it ends in a non-keyword char we accept any characters
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1486 // before it except white space.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1487 if (col == 0) // cannot be an abbr.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1488 return FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1489
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1490 if (has_mbyte)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1491 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1492 char_u *p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1493
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1494 p = mb_prevptr(ptr, ptr + col);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1495 if (!vim_iswordp(p))
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1496 vim_abbr = TRUE; // Vim added abbr.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1497 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1498 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1499 vim_abbr = FALSE; // vi compatible abbr.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1500 if (p > ptr)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1501 is_id = vim_iswordp(mb_prevptr(ptr, p));
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1502 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1503 clen = 1;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1504 while (p > ptr + mincol)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1505 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1506 p = mb_prevptr(ptr, p);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1507 if (vim_isspace(*p) || (!vim_abbr && is_id != vim_iswordp(p)))
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1508 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1509 p += (*mb_ptr2len)(p);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1510 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1511 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1512 ++clen;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1513 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1514 scol = (int)(p - ptr);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1515 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1516 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1517 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1518 if (!vim_iswordc(ptr[col - 1]))
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1519 vim_abbr = TRUE; // Vim added abbr.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1520 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1521 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1522 vim_abbr = FALSE; // vi compatible abbr.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1523 if (col > 1)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1524 is_id = vim_iswordc(ptr[col - 2]);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1525 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1526 for (scol = col - 1; scol > 0 && !vim_isspace(ptr[scol - 1])
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1527 && (vim_abbr || is_id == vim_iswordc(ptr[scol - 1])); --scol)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1528 ;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1529 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1530
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1531 if (scol < mincol)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1532 scol = mincol;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1533 if (scol < col) // there is a word in front of the cursor
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1534 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1535 ptr += scol;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1536 len = col - scol;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1537 mp = curbuf->b_first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1538 mp2 = first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1539 if (mp == NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1540 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1541 mp = mp2;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1542 mp2 = NULL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1543 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1544 for ( ; mp; mp->m_next == NULL
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1545 ? (mp = mp2, mp2 = NULL) : (mp = mp->m_next))
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1546 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1547 int qlen = mp->m_keylen;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1548 char_u *q = mp->m_keys;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1549 int match;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1550
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1551 if (vim_strbyte(mp->m_keys, K_SPECIAL) != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1552 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1553 char_u *qe = vim_strsave(mp->m_keys);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1554
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1555 // might have CSI escaped mp->m_keys
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1556 if (qe != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1557 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1558 q = qe;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1559 vim_unescape_csi(q);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1560 qlen = (int)STRLEN(q);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1561 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1562 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1563
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1564 // find entries with right mode and keys
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1565 match = (mp->m_mode & State)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1566 && qlen == len
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1567 && !STRNCMP(q, ptr, (size_t)len);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1568 if (q != mp->m_keys)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1569 vim_free(q);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1570 if (match)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1571 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1572 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1573 if (mp != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1574 {
27221
165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation
Bram Moolenaar <Bram@vim.org>
parents: 27165
diff changeset
1575 int noremap;
165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation
Bram Moolenaar <Bram@vim.org>
parents: 27165
diff changeset
1576 int silent;
165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation
Bram Moolenaar <Bram@vim.org>
parents: 27165
diff changeset
1577 #ifdef FEAT_EVAL
165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation
Bram Moolenaar <Bram@vim.org>
parents: 27165
diff changeset
1578 int expr;
165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation
Bram Moolenaar <Bram@vim.org>
parents: 27165
diff changeset
1579 #endif
165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation
Bram Moolenaar <Bram@vim.org>
parents: 27165
diff changeset
1580
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1581 // Found a match:
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1582 // Insert the rest of the abbreviation in typebuf.tb_buf[].
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1583 // This goes from end to start.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1584 //
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1585 // Characters 0x000 - 0x100: normal chars, may need CTRL-V,
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1586 // except K_SPECIAL: Becomes K_SPECIAL KS_SPECIAL KE_FILLER
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1587 // Characters where IS_SPECIAL() == TRUE: key codes, need
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1588 // K_SPECIAL. Other characters (with ABBR_OFF): don't use CTRL-V.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1589 //
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1590 // Character CTRL-] is treated specially - it completes the
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1591 // abbreviation, but is not inserted into the input stream.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1592 j = 0;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1593 if (c != Ctrl_RSB)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1594 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1595 // special key code, split up
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1596 if (IS_SPECIAL(c) || c == K_SPECIAL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1597 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1598 tb[j++] = K_SPECIAL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1599 tb[j++] = K_SECOND(c);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1600 tb[j++] = K_THIRD(c);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1601 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1602 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1603 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1604 if (c < ABBR_OFF && (c < ' ' || c > '~'))
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1605 tb[j++] = Ctrl_V; // special char needs CTRL-V
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1606 if (has_mbyte)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1607 {
24559
839145e0fdaa patch 8.2.2819: finishing an abbreviation with multi-byte char may not work
Bram Moolenaar <Bram@vim.org>
parents: 24529
diff changeset
1608 int newlen;
839145e0fdaa patch 8.2.2819: finishing an abbreviation with multi-byte char may not work
Bram Moolenaar <Bram@vim.org>
parents: 24529
diff changeset
1609 char_u *escaped;
839145e0fdaa patch 8.2.2819: finishing an abbreviation with multi-byte char may not work
Bram Moolenaar <Bram@vim.org>
parents: 24529
diff changeset
1610
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1611 // if ABBR_OFF has been added, remove it here
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1612 if (c >= ABBR_OFF)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1613 c -= ABBR_OFF;
24559
839145e0fdaa patch 8.2.2819: finishing an abbreviation with multi-byte char may not work
Bram Moolenaar <Bram@vim.org>
parents: 24529
diff changeset
1614 newlen = (*mb_char2bytes)(c, tb + j);
839145e0fdaa patch 8.2.2819: finishing an abbreviation with multi-byte char may not work
Bram Moolenaar <Bram@vim.org>
parents: 24529
diff changeset
1615 tb[j + newlen] = NUL;
839145e0fdaa patch 8.2.2819: finishing an abbreviation with multi-byte char may not work
Bram Moolenaar <Bram@vim.org>
parents: 24529
diff changeset
1616 // Need to escape K_SPECIAL.
839145e0fdaa patch 8.2.2819: finishing an abbreviation with multi-byte char may not work
Bram Moolenaar <Bram@vim.org>
parents: 24529
diff changeset
1617 escaped = vim_strsave_escape_csi(tb + j);
839145e0fdaa patch 8.2.2819: finishing an abbreviation with multi-byte char may not work
Bram Moolenaar <Bram@vim.org>
parents: 24529
diff changeset
1618 if (escaped != NULL)
839145e0fdaa patch 8.2.2819: finishing an abbreviation with multi-byte char may not work
Bram Moolenaar <Bram@vim.org>
parents: 24529
diff changeset
1619 {
24574
3a3d5ee00574 patch 8.2.2826: compiler warnings for int to size_t conversion
Bram Moolenaar <Bram@vim.org>
parents: 24559
diff changeset
1620 newlen = (int)STRLEN(escaped);
24559
839145e0fdaa patch 8.2.2819: finishing an abbreviation with multi-byte char may not work
Bram Moolenaar <Bram@vim.org>
parents: 24529
diff changeset
1621 mch_memmove(tb + j, escaped, newlen);
839145e0fdaa patch 8.2.2819: finishing an abbreviation with multi-byte char may not work
Bram Moolenaar <Bram@vim.org>
parents: 24529
diff changeset
1622 j += newlen;
839145e0fdaa patch 8.2.2819: finishing an abbreviation with multi-byte char may not work
Bram Moolenaar <Bram@vim.org>
parents: 24529
diff changeset
1623 vim_free(escaped);
839145e0fdaa patch 8.2.2819: finishing an abbreviation with multi-byte char may not work
Bram Moolenaar <Bram@vim.org>
parents: 24529
diff changeset
1624 }
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1625 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1626 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1627 tb[j++] = c;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1628 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1629 tb[j] = NUL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1630 // insert the last typed char
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1631 (void)ins_typebuf(tb, 1, 0, TRUE, mp->m_silent);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1632 }
27221
165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation
Bram Moolenaar <Bram@vim.org>
parents: 27165
diff changeset
1633
165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation
Bram Moolenaar <Bram@vim.org>
parents: 27165
diff changeset
1634 // copy values here, calling eval_map_expr() may make "mp" invalid!
165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation
Bram Moolenaar <Bram@vim.org>
parents: 27165
diff changeset
1635 noremap = mp->m_noremap;
165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation
Bram Moolenaar <Bram@vim.org>
parents: 27165
diff changeset
1636 silent = mp->m_silent;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1637 #ifdef FEAT_EVAL
27221
165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation
Bram Moolenaar <Bram@vim.org>
parents: 27165
diff changeset
1638 expr = mp->m_expr;
165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation
Bram Moolenaar <Bram@vim.org>
parents: 27165
diff changeset
1639
165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation
Bram Moolenaar <Bram@vim.org>
parents: 27165
diff changeset
1640 if (expr)
27061
1a56c0252772 patch 8.2.4059: Vim9: an expression of a map cannot access script-local items
Bram Moolenaar <Bram@vim.org>
parents: 26915
diff changeset
1641 s = eval_map_expr(mp, c);
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1642 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1643 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1644 s = mp->m_str;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1645 if (s != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1646 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1647 // insert the to string
27221
165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation
Bram Moolenaar <Bram@vim.org>
parents: 27165
diff changeset
1648 (void)ins_typebuf(s, noremap, 0, TRUE, silent);
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1649 // no abbrev. for these chars
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1650 typebuf.tb_no_abbr_cnt += (int)STRLEN(s) + j + 1;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1651 #ifdef FEAT_EVAL
27221
165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation
Bram Moolenaar <Bram@vim.org>
parents: 27165
diff changeset
1652 if (expr)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1653 vim_free(s);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1654 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1655 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1656
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1657 tb[0] = Ctrl_H;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1658 tb[1] = NUL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1659 if (has_mbyte)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1660 len = clen; // Delete characters instead of bytes
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1661 while (len-- > 0) // delete the from string
27221
165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation
Bram Moolenaar <Bram@vim.org>
parents: 27165
diff changeset
1662 (void)ins_typebuf(tb, 1, 0, TRUE, silent);
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1663 return TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1664 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1665 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1666 return FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1667 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1668
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1669 #ifdef FEAT_EVAL
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1670 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1671 * Evaluate the RHS of a mapping or abbreviations and take care of escaping
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1672 * special characters.
27221
165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation
Bram Moolenaar <Bram@vim.org>
parents: 27165
diff changeset
1673 * Careful: after this "mp" will be invalid if the mapping was deleted.
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1674 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1675 char_u *
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1676 eval_map_expr(
27061
1a56c0252772 patch 8.2.4059: Vim9: an expression of a map cannot access script-local items
Bram Moolenaar <Bram@vim.org>
parents: 26915
diff changeset
1677 mapblock_T *mp,
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1678 int c) // NUL or typed character for abbreviation
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1679 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1680 char_u *res;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1681 char_u *p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1682 char_u *expr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1683 pos_T save_cursor;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1684 int save_msg_col;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1685 int save_msg_row;
27061
1a56c0252772 patch 8.2.4059: Vim9: an expression of a map cannot access script-local items
Bram Moolenaar <Bram@vim.org>
parents: 26915
diff changeset
1686 scid_T save_sctx_sid = current_sctx.sc_sid;
1a56c0252772 patch 8.2.4059: Vim9: an expression of a map cannot access script-local items
Bram Moolenaar <Bram@vim.org>
parents: 26915
diff changeset
1687 int save_sctx_version = current_sctx.sc_version;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1688
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1689 // Remove escaping of CSI, because "str" is in a format to be used as
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1690 // typeahead.
27061
1a56c0252772 patch 8.2.4059: Vim9: an expression of a map cannot access script-local items
Bram Moolenaar <Bram@vim.org>
parents: 26915
diff changeset
1691 expr = vim_strsave(mp->m_str);
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1692 if (expr == NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1693 return NULL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1694 vim_unescape_csi(expr);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1695
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1696 // Forbid changing text or using ":normal" to avoid most of the bad side
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1697 // effects. Also restore the cursor position.
29014
45c182c4f7e9 patch 8.2.5029: "textlock" is always zero
Bram Moolenaar <Bram@vim.org>
parents: 28817
diff changeset
1698 ++textlock;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1699 ++ex_normal_lock;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1700 set_vim_var_char(c); // set v:char to the typed character
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1701 save_cursor = curwin->w_cursor;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1702 save_msg_col = msg_col;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1703 save_msg_row = msg_row;
27061
1a56c0252772 patch 8.2.4059: Vim9: an expression of a map cannot access script-local items
Bram Moolenaar <Bram@vim.org>
parents: 26915
diff changeset
1704 if (mp->m_script_ctx.sc_version == SCRIPT_VERSION_VIM9)
1a56c0252772 patch 8.2.4059: Vim9: an expression of a map cannot access script-local items
Bram Moolenaar <Bram@vim.org>
parents: 26915
diff changeset
1705 {
1a56c0252772 patch 8.2.4059: Vim9: an expression of a map cannot access script-local items
Bram Moolenaar <Bram@vim.org>
parents: 26915
diff changeset
1706 current_sctx.sc_sid = mp->m_script_ctx.sc_sid;
1a56c0252772 patch 8.2.4059: Vim9: an expression of a map cannot access script-local items
Bram Moolenaar <Bram@vim.org>
parents: 26915
diff changeset
1707 current_sctx.sc_version = SCRIPT_VERSION_VIM9;
1a56c0252772 patch 8.2.4059: Vim9: an expression of a map cannot access script-local items
Bram Moolenaar <Bram@vim.org>
parents: 26915
diff changeset
1708 }
1a56c0252772 patch 8.2.4059: Vim9: an expression of a map cannot access script-local items
Bram Moolenaar <Bram@vim.org>
parents: 26915
diff changeset
1709
1a56c0252772 patch 8.2.4059: Vim9: an expression of a map cannot access script-local items
Bram Moolenaar <Bram@vim.org>
parents: 26915
diff changeset
1710 // Note: the evaluation may make "mp" invalid.
20996
3af71cbcfdbe patch 8.2.1049: Vim9: leaking memory when using continuation line
Bram Moolenaar <Bram@vim.org>
parents: 20557
diff changeset
1711 p = eval_to_string(expr, FALSE);
27061
1a56c0252772 patch 8.2.4059: Vim9: an expression of a map cannot access script-local items
Bram Moolenaar <Bram@vim.org>
parents: 26915
diff changeset
1712
29014
45c182c4f7e9 patch 8.2.5029: "textlock" is always zero
Bram Moolenaar <Bram@vim.org>
parents: 28817
diff changeset
1713 --textlock;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1714 --ex_normal_lock;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1715 curwin->w_cursor = save_cursor;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1716 msg_col = save_msg_col;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1717 msg_row = save_msg_row;
27061
1a56c0252772 patch 8.2.4059: Vim9: an expression of a map cannot access script-local items
Bram Moolenaar <Bram@vim.org>
parents: 26915
diff changeset
1718 current_sctx.sc_sid = save_sctx_sid;
1a56c0252772 patch 8.2.4059: Vim9: an expression of a map cannot access script-local items
Bram Moolenaar <Bram@vim.org>
parents: 26915
diff changeset
1719 current_sctx.sc_version = save_sctx_version;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1720
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1721 vim_free(expr);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1722
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1723 if (p == NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1724 return NULL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1725 // Escape CSI in the result to be able to use the string as typeahead.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1726 res = vim_strsave_escape_csi(p);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1727 vim_free(p);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1728
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1729 return res;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1730 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1731 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1732
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1733 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1734 * Copy "p" to allocated memory, escaping K_SPECIAL and CSI so that the result
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1735 * can be put in the typeahead buffer.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1736 * Returns NULL when out of memory.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1737 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1738 char_u *
22862
6d50182e7e24 patch 8.2.1978: making a mapping work in all modes is complicated
Bram Moolenaar <Bram@vim.org>
parents: 22468
diff changeset
1739 vim_strsave_escape_csi(char_u *p)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1740 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1741 char_u *res;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1742 char_u *s, *d;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1743
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1744 // Need a buffer to hold up to three times as much. Four in case of an
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1745 // illegal utf-8 byte:
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1746 // 0xc0 -> 0xc3 0x80 -> 0xc3 K_SPECIAL KS_SPECIAL KE_FILLER
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1747 res = alloc(STRLEN(p) * 4 + 1);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1748 if (res != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1749 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1750 d = res;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1751 for (s = p; *s != NUL; )
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1752 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1753 if (s[0] == K_SPECIAL && s[1] != NUL && s[2] != NUL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1754 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1755 // Copy special key unmodified.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1756 *d++ = *s++;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1757 *d++ = *s++;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1758 *d++ = *s++;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1759 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1760 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1761 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1762 // Add character, possibly multi-byte to destination, escaping
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1763 // CSI and K_SPECIAL. Be careful, it can be an illegal byte!
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1764 d = add_char2buf(PTR2CHAR(s), d);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1765 s += MB_CPTR2LEN(s);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1766 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1767 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1768 *d = NUL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1769 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1770 return res;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1771 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1772
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1773 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1774 * Remove escaping from CSI and K_SPECIAL characters. Reverse of
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1775 * vim_strsave_escape_csi(). Works in-place.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1776 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1777 void
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1778 vim_unescape_csi(char_u *p)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1779 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1780 char_u *s = p, *d = p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1781
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1782 while (*s != NUL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1783 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1784 if (s[0] == K_SPECIAL && s[1] == KS_SPECIAL && s[2] == KE_FILLER)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1785 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1786 *d++ = K_SPECIAL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1787 s += 3;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1788 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1789 else if ((s[0] == K_SPECIAL || s[0] == CSI)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1790 && s[1] == KS_EXTRA && s[2] == (int)KE_CSI)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1791 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1792 *d++ = CSI;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1793 s += 3;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1794 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1795 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1796 *d++ = *s++;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1797 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1798 *d = NUL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1799 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1800
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1801 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1802 * Write map commands for the current mappings to an .exrc file.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1803 * Return FAIL on error, OK otherwise.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1804 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1805 int
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1806 makemap(
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1807 FILE *fd,
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1808 buf_T *buf) // buffer for local mappings or NULL
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1809 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1810 mapblock_T *mp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1811 char_u c1, c2, c3;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1812 char_u *p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1813 char *cmd;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1814 int abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1815 int hash;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1816 int did_cpo = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1817 int i;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1818
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1819 validate_maphash();
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1820
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1821 // Do the loop twice: Once for mappings, once for abbreviations.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1822 // Then loop over all map hash lists.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1823 for (abbr = 0; abbr < 2; ++abbr)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1824 for (hash = 0; hash < 256; ++hash)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1825 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1826 if (abbr)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1827 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1828 if (hash > 0) // there is only one abbr list
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1829 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1830 if (buf != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1831 mp = buf->b_first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1832 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1833 mp = first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1834 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1835 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1836 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1837 if (buf != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1838 mp = buf->b_maphash[hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1839 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1840 mp = maphash[hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1841 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1842
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1843 for ( ; mp; mp = mp->m_next)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1844 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1845 // skip script-local mappings
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1846 if (mp->m_noremap == REMAP_SCRIPT)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1847 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1848
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1849 // skip mappings that contain a <SNR> (script-local thing),
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1850 // they probably don't work when loaded again
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1851 for (p = mp->m_str; *p != NUL; ++p)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1852 if (p[0] == K_SPECIAL && p[1] == KS_EXTRA
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1853 && p[2] == (int)KE_SNR)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1854 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1855 if (*p != NUL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1856 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1857
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1858 // It's possible to create a mapping and then ":unmap" certain
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1859 // modes. We recreate this here by mapping the individual
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1860 // modes, which requires up to three of them.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1861 c1 = NUL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1862 c2 = NUL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1863 c3 = NUL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1864 if (abbr)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1865 cmd = "abbr";
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1866 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1867 cmd = "map";
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1868 switch (mp->m_mode)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1869 {
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1870 case MODE_NORMAL | MODE_VISUAL | MODE_SELECT
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1871 | MODE_OP_PENDING:
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1872 break;
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1873 case MODE_NORMAL:
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1874 c1 = 'n';
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1875 break;
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1876 case MODE_VISUAL:
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1877 c1 = 'x';
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1878 break;
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1879 case MODE_SELECT:
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1880 c1 = 's';
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1881 break;
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1882 case MODE_OP_PENDING:
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1883 c1 = 'o';
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1884 break;
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1885 case MODE_NORMAL | MODE_VISUAL:
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1886 c1 = 'n';
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1887 c2 = 'x';
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1888 break;
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1889 case MODE_NORMAL | MODE_SELECT:
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1890 c1 = 'n';
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1891 c2 = 's';
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1892 break;
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1893 case MODE_NORMAL | MODE_OP_PENDING:
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1894 c1 = 'n';
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1895 c2 = 'o';
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1896 break;
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1897 case MODE_VISUAL | MODE_SELECT:
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1898 c1 = 'v';
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1899 break;
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1900 case MODE_VISUAL | MODE_OP_PENDING:
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1901 c1 = 'x';
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1902 c2 = 'o';
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1903 break;
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1904 case MODE_SELECT | MODE_OP_PENDING:
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1905 c1 = 's';
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1906 c2 = 'o';
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1907 break;
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1908 case MODE_NORMAL | MODE_VISUAL | MODE_SELECT:
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1909 c1 = 'n';
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1910 c2 = 'v';
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1911 break;
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1912 case MODE_NORMAL | MODE_VISUAL | MODE_OP_PENDING:
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1913 c1 = 'n';
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1914 c2 = 'x';
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1915 c3 = 'o';
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1916 break;
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1917 case MODE_NORMAL | MODE_SELECT | MODE_OP_PENDING:
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1918 c1 = 'n';
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1919 c2 = 's';
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1920 c3 = 'o';
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1921 break;
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1922 case MODE_VISUAL | MODE_SELECT | MODE_OP_PENDING:
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1923 c1 = 'v';
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1924 c2 = 'o';
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1925 break;
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1926 case MODE_CMDLINE | MODE_INSERT:
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1927 if (!abbr)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1928 cmd = "map!";
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1929 break;
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1930 case MODE_CMDLINE:
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1931 c1 = 'c';
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1932 break;
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1933 case MODE_INSERT:
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1934 c1 = 'i';
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1935 break;
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1936 case MODE_LANGMAP:
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1937 c1 = 'l';
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1938 break;
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
1939 case MODE_TERMINAL:
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1940 c1 = 't';
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1941 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1942 default:
26861
df2de1e63de0 patch 8.2.3959: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents: 26224
diff changeset
1943 iemsg(_(e_makemap_illegal_mode));
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1944 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1945 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1946 do // do this twice if c2 is set, 3 times with c3
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1947 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1948 // When outputting <> form, need to make sure that 'cpo'
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1949 // is set to the Vim default.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1950 if (!did_cpo)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1951 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1952 if (*mp->m_str == NUL) // will use <Nop>
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1953 did_cpo = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1954 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1955 for (i = 0; i < 2; ++i)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1956 for (p = (i ? mp->m_str : mp->m_keys); *p; ++p)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1957 if (*p == K_SPECIAL || *p == NL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1958 did_cpo = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1959 if (did_cpo)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1960 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1961 if (fprintf(fd, "let s:cpo_save=&cpo") < 0
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1962 || put_eol(fd) < 0
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1963 || fprintf(fd, "set cpo&vim") < 0
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1964 || put_eol(fd) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1965 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1966 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1967 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1968 if (c1 && putc(c1, fd) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1969 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1970 if (mp->m_noremap != REMAP_YES && fprintf(fd, "nore") < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1971 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1972 if (fputs(cmd, fd) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1973 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1974 if (buf != NULL && fputs(" <buffer>", fd) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1975 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1976 if (mp->m_nowait && fputs(" <nowait>", fd) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1977 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1978 if (mp->m_silent && fputs(" <silent>", fd) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1979 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1980 #ifdef FEAT_EVAL
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1981 if (mp->m_noremap == REMAP_SCRIPT
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1982 && fputs("<script>", fd) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1983 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1984 if (mp->m_expr && fputs(" <expr>", fd) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1985 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1986 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1987
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1988 if ( putc(' ', fd) < 0
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1989 || put_escstr(fd, mp->m_keys, 0) == FAIL
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1990 || putc(' ', fd) < 0
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1991 || put_escstr(fd, mp->m_str, 1) == FAIL
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1992 || put_eol(fd) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1993 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1994 c1 = c2;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1995 c2 = c3;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1996 c3 = NUL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1997 } while (c1 != NUL);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1998 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1999 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2000
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2001 if (did_cpo)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2002 if (fprintf(fd, "let &cpo=s:cpo_save") < 0
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2003 || put_eol(fd) < 0
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2004 || fprintf(fd, "unlet s:cpo_save") < 0
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2005 || put_eol(fd) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2006 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2007 return OK;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2008 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2009
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2010 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2011 * write escape string to file
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2012 * "what": 0 for :map lhs, 1 for :map rhs, 2 for :set
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2013 *
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2014 * return FAIL for failure, OK otherwise
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2015 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2016 int
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2017 put_escstr(FILE *fd, char_u *strstart, int what)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2018 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2019 char_u *str = strstart;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2020 int c;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2021 int modifiers;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2022
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2023 // :map xx <Nop>
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2024 if (*str == NUL && what == 1)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2025 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2026 if (fprintf(fd, "<Nop>") < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2027 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2028 return OK;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2029 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2030
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2031 for ( ; *str != NUL; ++str)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2032 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2033 char_u *p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2034
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2035 // Check for a multi-byte character, which may contain escaped
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2036 // K_SPECIAL and CSI bytes
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2037 p = mb_unescape(&str);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2038 if (p != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2039 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2040 while (*p != NUL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2041 if (fputc(*p++, fd) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2042 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2043 --str;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2044 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2045 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2046
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2047 c = *str;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2048 // Special key codes have to be translated to be able to make sense
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2049 // when they are read back.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2050 if (c == K_SPECIAL && what != 2)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2051 {
21996
808edde1e97d patch 8.2.1547: various comment problems
Bram Moolenaar <Bram@vim.org>
parents: 20996
diff changeset
2052 modifiers = 0;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2053 if (str[1] == KS_MODIFIER)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2054 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2055 modifiers = str[2];
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2056 str += 3;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2057 c = *str;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2058 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2059 if (c == K_SPECIAL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2060 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2061 c = TO_SPECIAL(str[1], str[2]);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2062 str += 2;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2063 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2064 if (IS_SPECIAL(c) || modifiers) // special key
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2065 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2066 if (fputs((char *)get_special_key_name(c, modifiers), fd) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2067 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2068 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2069 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2070 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2071
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2072 // A '\n' in a map command should be written as <NL>.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2073 // A '\n' in a set command should be written as \^V^J.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2074 if (c == NL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2075 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2076 if (what == 2)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2077 {
27490
fb4c30606b4a patch 8.2.4273: the EBCDIC support is outdated
Bram Moolenaar <Bram@vim.org>
parents: 27243
diff changeset
2078 if (fprintf(fd, "\\\026\n") < 0)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2079 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2080 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2081 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2082 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2083 if (fprintf(fd, "<NL>") < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2084 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2085 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2086 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2087 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2088
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2089 // Some characters have to be escaped with CTRL-V to
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2090 // prevent them from misinterpreted in DoOneCmd().
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2091 // A space, Tab and '"' has to be escaped with a backslash to
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2092 // prevent it to be misinterpreted in do_set().
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2093 // A space has to be escaped with a CTRL-V when it's at the start of a
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2094 // ":map" rhs.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2095 // A '<' has to be escaped with a CTRL-V to prevent it being
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2096 // interpreted as the start of a special key name.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2097 // A space in the lhs of a :map needs a CTRL-V.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2098 if (what == 2 && (VIM_ISWHITE(c) || c == '"' || c == '\\'))
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2099 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2100 if (putc('\\', fd) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2101 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2102 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2103 else if (c < ' ' || c > '~' || c == '|'
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2104 || (what == 0 && c == ' ')
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2105 || (what == 1 && str == strstart && c == ' ')
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2106 || (what != 2 && c == '<'))
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2107 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2108 if (putc(Ctrl_V, fd) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2109 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2110 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2111 if (putc(c, fd) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2112 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2113 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2114 return OK;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2115 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2116
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2117 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2118 * Check all mappings for the presence of special key codes.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2119 * Used after ":set term=xxx".
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2120 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2121 void
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2122 check_map_keycodes(void)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2123 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2124 mapblock_T *mp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2125 char_u *p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2126 int i;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2127 char_u buf[3];
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2128 int abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2129 int hash;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2130 buf_T *bp;
19075
af1eca322b9e patch 8.2.0098: exe stack length can be wrong without being detected
Bram Moolenaar <Bram@vim.org>
parents: 18991
diff changeset
2131 ESTACK_CHECK_DECLARATION
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2132
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2133 validate_maphash();
18991
847cc7932c42 patch 8.2.0056: execution stack is incomplete and inefficient
Bram Moolenaar <Bram@vim.org>
parents: 18498
diff changeset
2134 // avoids giving error messages
847cc7932c42 patch 8.2.0056: execution stack is incomplete and inefficient
Bram Moolenaar <Bram@vim.org>
parents: 18498
diff changeset
2135 estack_push(ETYPE_INTERNAL, (char_u *)"mappings", 0);
19075
af1eca322b9e patch 8.2.0098: exe stack length can be wrong without being detected
Bram Moolenaar <Bram@vim.org>
parents: 18991
diff changeset
2136 ESTACK_CHECK_SETUP
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2137
18498
9e6d5a4abb1c patch 8.1.2243: typos in comments
Bram Moolenaar <Bram@vim.org>
parents: 18329
diff changeset
2138 // Do this once for each buffer, and then once for global
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2139 // mappings/abbreviations with bp == NULL
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2140 for (bp = firstbuf; ; bp = bp->b_next)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2141 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2142 // Do the loop twice: Once for mappings, once for abbreviations.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2143 // Then loop over all map hash lists.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2144 for (abbr = 0; abbr <= 1; ++abbr)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2145 for (hash = 0; hash < 256; ++hash)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2146 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2147 if (abbr)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2148 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2149 if (hash) // there is only one abbr list
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2150 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2151 if (bp != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2152 mp = bp->b_first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2153 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2154 mp = first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2155 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2156 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2157 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2158 if (bp != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2159 mp = bp->b_maphash[hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2160 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2161 mp = maphash[hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2162 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2163 for ( ; mp != NULL; mp = mp->m_next)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2164 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2165 for (i = 0; i <= 1; ++i) // do this twice
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2166 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2167 if (i == 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2168 p = mp->m_keys; // once for the "from" part
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2169 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2170 p = mp->m_str; // and once for the "to" part
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2171 while (*p)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2172 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2173 if (*p == K_SPECIAL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2174 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2175 ++p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2176 if (*p < 128) // for "normal" tcap entries
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2177 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2178 buf[0] = p[0];
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2179 buf[1] = p[1];
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2180 buf[2] = NUL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2181 (void)add_termcap_entry(buf, FALSE);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2182 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2183 ++p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2184 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2185 ++p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2186 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2187 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2188 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2189 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2190 if (bp == NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2191 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2192 }
19075
af1eca322b9e patch 8.2.0098: exe stack length can be wrong without being detected
Bram Moolenaar <Bram@vim.org>
parents: 18991
diff changeset
2193 ESTACK_CHECK_NOW
18991
847cc7932c42 patch 8.2.0056: execution stack is incomplete and inefficient
Bram Moolenaar <Bram@vim.org>
parents: 18498
diff changeset
2194 estack_pop();
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2195 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2196
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2197 #if defined(FEAT_EVAL) || defined(PROTO)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2198 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2199 * Check the string "keys" against the lhs of all mappings.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2200 * Return pointer to rhs of mapping (mapblock->m_str).
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2201 * NULL when no mapping found.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2202 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2203 char_u *
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2204 check_map(
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2205 char_u *keys,
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2206 int mode,
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2207 int exact, // require exact match
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2208 int ign_mod, // ignore preceding modifier
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2209 int abbr, // do abbreviations
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2210 mapblock_T **mp_ptr, // return: pointer to mapblock or NULL
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2211 int *local_ptr) // return: buffer-local mapping or NULL
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2212 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2213 int hash;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2214 int len, minlen;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2215 mapblock_T *mp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2216 char_u *s;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2217 int local;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2218
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2219 validate_maphash();
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2220
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2221 len = (int)STRLEN(keys);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2222 for (local = 1; local >= 0; --local)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2223 // loop over all hash lists
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2224 for (hash = 0; hash < 256; ++hash)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2225 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2226 if (abbr)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2227 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2228 if (hash > 0) // there is only one list.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2229 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2230 if (local)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2231 mp = curbuf->b_first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2232 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2233 mp = first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2234 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2235 else if (local)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2236 mp = curbuf->b_maphash[hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2237 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2238 mp = maphash[hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2239 for ( ; mp != NULL; mp = mp->m_next)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2240 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2241 // skip entries with wrong mode, wrong length and not matching
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2242 // ones
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2243 if ((mp->m_mode & mode) && (!exact || mp->m_keylen == len))
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2244 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2245 if (len > mp->m_keylen)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2246 minlen = mp->m_keylen;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2247 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2248 minlen = len;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2249 s = mp->m_keys;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2250 if (ign_mod && s[0] == K_SPECIAL && s[1] == KS_MODIFIER
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2251 && s[2] != NUL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2252 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2253 s += 3;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2254 if (len > mp->m_keylen - 3)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2255 minlen = mp->m_keylen - 3;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2256 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2257 if (STRNCMP(s, keys, minlen) == 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2258 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2259 if (mp_ptr != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2260 *mp_ptr = mp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2261 if (local_ptr != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2262 *local_ptr = local;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2263 return mp->m_str;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2264 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2265 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2266 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2267 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2268
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2269 return NULL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2270 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2271
28592
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2272 /*
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2273 * Fill in the empty dictionary with items as defined by maparg builtin.
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2274 */
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2275 static void
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2276 mapblock2dict(
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2277 mapblock_T *mp,
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2278 dict_T *dict,
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2279 char_u *lhsrawalt, // may be NULL
28674
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2280 int buffer_local, // false if not buffer local mapping
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2281 int abbr) // true if abbreviation
28592
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2282 {
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2283 char_u *lhs = str2special_save(mp->m_keys, TRUE);
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2284 char_u *mapmode = map_mode_to_chars(mp->m_mode);
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2285
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2286 dict_add_string(dict, "lhs", lhs);
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2287 vim_free(lhs);
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2288 dict_add_string(dict, "lhsraw", mp->m_keys);
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2289 if (lhsrawalt)
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2290 // Also add the value for the simplified entry.
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2291 dict_add_string(dict, "lhsrawalt", lhsrawalt);
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2292 dict_add_string(dict, "rhs", mp->m_orig_str);
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2293 dict_add_number(dict, "noremap", mp->m_noremap ? 1L : 0L);
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2294 dict_add_number(dict, "script", mp->m_noremap == REMAP_SCRIPT
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2295 ? 1L : 0L);
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2296 dict_add_number(dict, "expr", mp->m_expr ? 1L : 0L);
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2297 dict_add_number(dict, "silent", mp->m_silent ? 1L : 0L);
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2298 dict_add_number(dict, "sid", (long)mp->m_script_ctx.sc_sid);
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2299 dict_add_number(dict, "scriptversion",
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2300 (long)mp->m_script_ctx.sc_version);
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2301 dict_add_number(dict, "lnum", (long)mp->m_script_ctx.sc_lnum);
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2302 dict_add_number(dict, "buffer", (long)buffer_local);
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2303 dict_add_number(dict, "nowait", mp->m_nowait ? 1L : 0L);
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2304 dict_add_string(dict, "mode", mapmode);
28674
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2305 dict_add_number(dict, "abbr", abbr ? 1L : 0L);
28817
1ad71fcbf546 patch 8.2.4932: not easy to filter the output of maplist()
Bram Moolenaar <Bram@vim.org>
parents: 28773
diff changeset
2306 dict_add_number(dict, "mode_bits", mp->m_mode);
28592
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2307
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2308 vim_free(mapmode);
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2309 }
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2310
25431
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2311 static void
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2312 get_maparg(typval_T *argvars, typval_T *rettv, int exact)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2313 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2314 char_u *keys;
20522
729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset()
Bram Moolenaar <Bram@vim.org>
parents: 20516
diff changeset
2315 char_u *keys_simplified;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2316 char_u *which;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2317 char_u buf[NUMBUFLEN];
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2318 char_u *keys_buf = NULL;
20522
729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset()
Bram Moolenaar <Bram@vim.org>
parents: 20516
diff changeset
2319 char_u *alt_keys_buf = NULL;
729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset()
Bram Moolenaar <Bram@vim.org>
parents: 20516
diff changeset
2320 int did_simplify = FALSE;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2321 char_u *rhs;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2322 int mode;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2323 int abbr = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2324 int get_dict = FALSE;
28614
9ae2c32841fb patch 8.2.4831: crash when using maparg() and unmapping simplified keys
Bram Moolenaar <Bram@vim.org>
parents: 28608
diff changeset
2325 mapblock_T *mp = NULL;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2326 int buffer_local;
20522
729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset()
Bram Moolenaar <Bram@vim.org>
parents: 20516
diff changeset
2327 int flags = REPTERM_FROM_PART | REPTERM_DO_LT;
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2328
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2329 // return empty string for failure
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2330 rettv->v_type = VAR_STRING;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2331 rettv->vval.v_string = NULL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2332
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2333 keys = tv_get_string(&argvars[0]);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2334 if (*keys == NUL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2335 return;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2336
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2337 if (argvars[1].v_type != VAR_UNKNOWN)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2338 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2339 which = tv_get_string_buf_chk(&argvars[1], buf);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2340 if (argvars[2].v_type != VAR_UNKNOWN)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2341 {
22055
88bedbb4ba75 patch 8.2.1577: Vim9: hasmapto()/mapcheck()/maparg() do nottake "true" arg
Bram Moolenaar <Bram@vim.org>
parents: 21996
diff changeset
2342 abbr = (int)tv_get_bool(&argvars[2]);
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2343 if (argvars[3].v_type != VAR_UNKNOWN)
22055
88bedbb4ba75 patch 8.2.1577: Vim9: hasmapto()/mapcheck()/maparg() do nottake "true" arg
Bram Moolenaar <Bram@vim.org>
parents: 21996
diff changeset
2344 get_dict = (int)tv_get_bool(&argvars[3]);
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2345 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2346 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2347 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2348 which = (char_u *)"";
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2349 if (which == NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2350 return;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2351
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2352 mode = get_map_mode(&which, 0);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2353
20522
729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset()
Bram Moolenaar <Bram@vim.org>
parents: 20516
diff changeset
2354 keys_simplified = replace_termcodes(keys, &keys_buf, flags, &did_simplify);
729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset()
Bram Moolenaar <Bram@vim.org>
parents: 20516
diff changeset
2355 rhs = check_map(keys_simplified, mode, exact, FALSE, abbr,
729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset()
Bram Moolenaar <Bram@vim.org>
parents: 20516
diff changeset
2356 &mp, &buffer_local);
729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset()
Bram Moolenaar <Bram@vim.org>
parents: 20516
diff changeset
2357 if (did_simplify)
729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset()
Bram Moolenaar <Bram@vim.org>
parents: 20516
diff changeset
2358 {
729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset()
Bram Moolenaar <Bram@vim.org>
parents: 20516
diff changeset
2359 // When the lhs is being simplified the not-simplified keys are
23229
b545334ae654 patch 8.2.2160: various typos
Bram Moolenaar <Bram@vim.org>
parents: 22862
diff changeset
2360 // preferred for printing, like in do_map().
20522
729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset()
Bram Moolenaar <Bram@vim.org>
parents: 20516
diff changeset
2361 (void)replace_termcodes(keys, &alt_keys_buf,
729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset()
Bram Moolenaar <Bram@vim.org>
parents: 20516
diff changeset
2362 flags | REPTERM_NO_SIMPLIFY, NULL);
729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset()
Bram Moolenaar <Bram@vim.org>
parents: 20516
diff changeset
2363 rhs = check_map(alt_keys_buf, mode, exact, FALSE, abbr, &mp,
729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset()
Bram Moolenaar <Bram@vim.org>
parents: 20516
diff changeset
2364 &buffer_local);
729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset()
Bram Moolenaar <Bram@vim.org>
parents: 20516
diff changeset
2365 }
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2366
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2367 if (!get_dict)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2368 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2369 // Return a string.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2370 if (rhs != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2371 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2372 if (*rhs == NUL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2373 rettv->vval.v_string = vim_strsave((char_u *)"<Nop>");
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2374 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2375 rettv->vval.v_string = str2special_save(rhs, FALSE);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2376 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2377
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2378 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2379 else if (rettv_dict_alloc(rettv) != FAIL && rhs != NULL)
28592
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2380 mapblock2dict(mp, rettv->vval.v_dict,
28674
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2381 did_simplify ? keys_simplified : NULL,
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2382 buffer_local, abbr);
20522
729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset()
Bram Moolenaar <Bram@vim.org>
parents: 20516
diff changeset
2383
729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset()
Bram Moolenaar <Bram@vim.org>
parents: 20516
diff changeset
2384 vim_free(keys_buf);
729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset()
Bram Moolenaar <Bram@vim.org>
parents: 20516
diff changeset
2385 vim_free(alt_keys_buf);
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2386 }
20506
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2387
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2388 /*
28602
398c5b3211f9 patch 8.2.4825: can only get a list of mappings
Bram Moolenaar <Bram@vim.org>
parents: 28600
diff changeset
2389 * "maplist()" function
28592
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2390 */
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2391 void
28602
398c5b3211f9 patch 8.2.4825: can only get a list of mappings
Bram Moolenaar <Bram@vim.org>
parents: 28600
diff changeset
2392 f_maplist(typval_T *argvars UNUSED, typval_T *rettv)
28592
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2393 {
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2394 dict_T *d;
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2395 mapblock_T *mp;
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2396 int buffer_local;
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2397 char_u *keys_buf;
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2398 int did_simplify;
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2399 int hash;
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2400 char_u *lhs;
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2401 const int flags = REPTERM_FROM_PART | REPTERM_DO_LT;
28602
398c5b3211f9 patch 8.2.4825: can only get a list of mappings
Bram Moolenaar <Bram@vim.org>
parents: 28600
diff changeset
2402 int abbr = FALSE;
398c5b3211f9 patch 8.2.4825: can only get a list of mappings
Bram Moolenaar <Bram@vim.org>
parents: 28600
diff changeset
2403
398c5b3211f9 patch 8.2.4825: can only get a list of mappings
Bram Moolenaar <Bram@vim.org>
parents: 28600
diff changeset
2404 if (in_vim9script() && check_for_opt_bool_arg(argvars, 0) == FAIL)
398c5b3211f9 patch 8.2.4825: can only get a list of mappings
Bram Moolenaar <Bram@vim.org>
parents: 28600
diff changeset
2405 return;
398c5b3211f9 patch 8.2.4825: can only get a list of mappings
Bram Moolenaar <Bram@vim.org>
parents: 28600
diff changeset
2406 if (argvars[0].v_type != VAR_UNKNOWN)
398c5b3211f9 patch 8.2.4825: can only get a list of mappings
Bram Moolenaar <Bram@vim.org>
parents: 28600
diff changeset
2407 abbr = tv_get_bool(&argvars[0]);
28592
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2408
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2409 if (rettv_list_alloc(rettv) != OK)
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2410 return;
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2411
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2412 validate_maphash();
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2413
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2414 // Do it twice: once for global maps and once for local maps.
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2415 for (buffer_local = 0; buffer_local <= 1; ++buffer_local)
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2416 {
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2417 for (hash = 0; hash < 256; ++hash)
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2418 {
28602
398c5b3211f9 patch 8.2.4825: can only get a list of mappings
Bram Moolenaar <Bram@vim.org>
parents: 28600
diff changeset
2419 if (abbr)
398c5b3211f9 patch 8.2.4825: can only get a list of mappings
Bram Moolenaar <Bram@vim.org>
parents: 28600
diff changeset
2420 {
398c5b3211f9 patch 8.2.4825: can only get a list of mappings
Bram Moolenaar <Bram@vim.org>
parents: 28600
diff changeset
2421 if (hash > 0) // there is only one abbr list
398c5b3211f9 patch 8.2.4825: can only get a list of mappings
Bram Moolenaar <Bram@vim.org>
parents: 28600
diff changeset
2422 break;
398c5b3211f9 patch 8.2.4825: can only get a list of mappings
Bram Moolenaar <Bram@vim.org>
parents: 28600
diff changeset
2423 if (buffer_local)
398c5b3211f9 patch 8.2.4825: can only get a list of mappings
Bram Moolenaar <Bram@vim.org>
parents: 28600
diff changeset
2424 mp = curbuf->b_first_abbr;
398c5b3211f9 patch 8.2.4825: can only get a list of mappings
Bram Moolenaar <Bram@vim.org>
parents: 28600
diff changeset
2425 else
398c5b3211f9 patch 8.2.4825: can only get a list of mappings
Bram Moolenaar <Bram@vim.org>
parents: 28600
diff changeset
2426 mp = first_abbr;
398c5b3211f9 patch 8.2.4825: can only get a list of mappings
Bram Moolenaar <Bram@vim.org>
parents: 28600
diff changeset
2427 }
398c5b3211f9 patch 8.2.4825: can only get a list of mappings
Bram Moolenaar <Bram@vim.org>
parents: 28600
diff changeset
2428 else if (buffer_local)
28592
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2429 mp = curbuf->b_maphash[hash];
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2430 else
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2431 mp = maphash[hash];
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2432 for (; mp; mp = mp->m_next)
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2433 {
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2434 if (mp->m_simplified)
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2435 continue;
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2436 if ((d = dict_alloc()) == NULL)
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2437 return;
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2438 if (list_append_dict(rettv->vval.v_list, d) == FAIL)
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2439 return;
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2440
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2441 keys_buf = NULL;
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2442 did_simplify = FALSE;
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2443
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2444 lhs = str2special_save(mp->m_keys, TRUE);
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2445 (void)replace_termcodes(lhs, &keys_buf, flags, &did_simplify);
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2446 vim_free(lhs);
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2447
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2448 mapblock2dict(mp, d,
28674
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2449 did_simplify ? keys_buf : NULL,
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2450 buffer_local, abbr);
28592
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2451 vim_free(keys_buf);
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2452 }
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2453 }
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2454 }
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2455 }
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2456
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping
Bram Moolenaar <Bram@vim.org>
parents: 28590
diff changeset
2457 /*
25431
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2458 * "maparg()" function
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2459 */
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2460 void
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2461 f_maparg(typval_T *argvars, typval_T *rettv)
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2462 {
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2463 if (in_vim9script()
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2464 && (check_for_string_arg(argvars, 0) == FAIL
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2465 || check_for_opt_string_arg(argvars, 1) == FAIL
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2466 || (argvars[1].v_type != VAR_UNKNOWN
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2467 && (check_for_opt_bool_arg(argvars, 2) == FAIL
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2468 || (argvars[2].v_type != VAR_UNKNOWN
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2469 && check_for_opt_bool_arg(argvars, 3) == FAIL)))))
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2470 return;
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2471
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2472 get_maparg(argvars, rettv, TRUE);
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2473 }
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2474
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2475 /*
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2476 * "mapcheck()" function
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2477 */
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2478 void
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2479 f_mapcheck(typval_T *argvars, typval_T *rettv)
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2480 {
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2481 if (in_vim9script()
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2482 && (check_for_string_arg(argvars, 0) == FAIL
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2483 || check_for_opt_string_arg(argvars, 1) == FAIL
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2484 || (argvars[1].v_type != VAR_UNKNOWN
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2485 && check_for_opt_bool_arg(argvars, 2) == FAIL)))
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2486 return;
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2487
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2488 get_maparg(argvars, rettv, FALSE);
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2489 }
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2490
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines
Bram Moolenaar <Bram@vim.org>
parents: 25306
diff changeset
2491 /*
28674
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2492 * Get the mapping mode from the mode string.
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2493 * It may contain multiple characters, eg "nox", or "!", or ' '
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2494 * Return 0 if there is an error.
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2495 */
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2496 static int
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2497 get_map_mode_string(char_u *mode_string, int abbr)
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2498 {
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2499 char_u *p = mode_string;
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2500 int mode = 0;
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2501 int tmode;
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2502 int modec;
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
2503 const int MASK_V = MODE_VISUAL | MODE_SELECT;
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
2504 const int MASK_MAP = MODE_VISUAL | MODE_SELECT | MODE_NORMAL
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
2505 | MODE_OP_PENDING;
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
2506 const int MASK_BANG = MODE_INSERT | MODE_CMDLINE;
28674
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2507
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2508 if (*p == NUL)
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2509 p = (char_u *)" "; // compatibility
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2510 while ((modec = *p++))
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2511 {
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2512 switch (modec)
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2513 {
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
2514 case 'i': tmode = MODE_INSERT; break;
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
2515 case 'l': tmode = MODE_LANGMAP; break;
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
2516 case 'c': tmode = MODE_CMDLINE; break;
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
2517 case 'n': tmode = MODE_NORMAL; break;
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
2518 case 'x': tmode = MODE_VISUAL; break;
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
2519 case 's': tmode = MODE_SELECT; break;
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
2520 case 'o': tmode = MODE_OP_PENDING; break;
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
2521 case 't': tmode = MODE_TERMINAL; break;
28674
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2522 case 'v': tmode = MASK_V; break;
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2523 case '!': tmode = MASK_BANG; break;
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2524 case ' ': tmode = MASK_MAP; break;
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2525 default:
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2526 return 0; // error, unknown mode character
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2527 }
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2528 mode |= tmode;
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2529 }
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2530 if ((abbr && (mode & ~MASK_BANG) != 0)
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2531 || (!abbr && (mode & (mode-1)) != 0 // more than one bit set
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2532 && (
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2533 // false if multiple bits set in mode and mode is fully
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2534 // contained in one mask
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2535 !(((mode & MASK_BANG) != 0 && (mode & ~MASK_BANG) == 0)
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2536 || ((mode & MASK_MAP) != 0 && (mode & ~MASK_MAP) == 0)))))
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2537 return 0;
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2538
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2539 return mode;
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2540 }
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2541
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2542 /*
20506
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2543 * "mapset()" function
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2544 */
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2545 void
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2546 f_mapset(typval_T *argvars, typval_T *rettv UNUSED)
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2547 {
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2548 char_u *keys_buf = NULL;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2549 char_u *which;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2550 int mode;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2551 char_u buf[NUMBUFLEN];
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2552 int is_abbr;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2553 dict_T *d;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2554 char_u *lhs;
20522
729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset()
Bram Moolenaar <Bram@vim.org>
parents: 20516
diff changeset
2555 char_u *lhsraw;
729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset()
Bram Moolenaar <Bram@vim.org>
parents: 20516
diff changeset
2556 char_u *lhsrawalt;
20506
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2557 char_u *rhs;
20516
d9e3fdf26cb9 patch 8.2.0812: mapset() does not properly handle <> notation
Bram Moolenaar <Bram@vim.org>
parents: 20510
diff changeset
2558 char_u *orig_rhs;
d9e3fdf26cb9 patch 8.2.0812: mapset() does not properly handle <> notation
Bram Moolenaar <Bram@vim.org>
parents: 20510
diff changeset
2559 char_u *arg_buf = NULL;
20506
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2560 int noremap;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2561 int expr;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2562 int silent;
24529
db2b4e867d06 patch 8.2.2804: setting buffer local mapping with mapset() changes global
Bram Moolenaar <Bram@vim.org>
parents: 23493
diff changeset
2563 int buffer;
20506
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2564 scid_T sid;
27223
ea2b4cb4515b patch 8.2.4140: maparg() does not indicate the type of script
Bram Moolenaar <Bram@vim.org>
parents: 27221
diff changeset
2565 int scriptversion;
20506
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2566 linenr_T lnum;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2567 mapblock_T **map_table = maphash;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2568 mapblock_T **abbr_table = &first_abbr;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2569 int nowait;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2570 char_u *arg;
28674
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2571 int dict_only;
20506
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2572
28674
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2573 // If first arg is a dict, then that's the only arg permitted.
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2574 dict_only = argvars[0].v_type == VAR_DICT;
25302
4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time
Bram Moolenaar <Bram@vim.org>
parents: 25064
diff changeset
2575 if (in_vim9script()
28674
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2576 && (check_for_string_or_dict_arg(argvars, 0) == FAIL
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2577 || (dict_only && check_for_unknown_arg(argvars, 1) == FAIL)
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2578 || (!dict_only
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2579 && (check_for_string_arg(argvars, 0) == FAIL
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2580 || check_for_bool_arg(argvars, 1) == FAIL
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2581 || check_for_dict_arg(argvars, 2) == FAIL))))
25302
4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time
Bram Moolenaar <Bram@vim.org>
parents: 25064
diff changeset
2582 return;
4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time
Bram Moolenaar <Bram@vim.org>
parents: 25064
diff changeset
2583
28674
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2584 if (dict_only)
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2585 {
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2586 d = argvars[0].vval.v_dict;
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2587 which = dict_get_string(d, (char_u *)"mode", FALSE);
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2588 is_abbr = dict_get_bool(d, (char_u *)"abbr", -1);
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2589 if (which == NULL || is_abbr < 0)
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2590 {
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2591 emsg(_(e_entries_missing_in_mapset_dict_argument));
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2592 return;
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2593 }
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2594 }
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2595 else
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2596 {
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2597 which = tv_get_string_buf_chk(&argvars[0], buf);
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2598 if (which == NULL)
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2599 return;
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2600 is_abbr = (int)tv_get_bool(&argvars[1]);
20506
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2601
28674
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2602 if (argvars[2].v_type != VAR_DICT)
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2603 {
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2604 emsg(_(e_dictionary_required));
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2605 return;
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2606 }
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2607 d = argvars[2].vval.v_dict;
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2608 }
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2609 mode = get_map_mode_string(which, is_abbr);
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2610 if (mode == 0)
20506
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2611 {
28674
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2612 semsg(_(e_illegal_map_mode_string_str), which);
20506
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2613 return;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2614 }
28674
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings
Bram Moolenaar <Bram@vim.org>
parents: 28614
diff changeset
2615
20506
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2616
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2617 // Get the values in the same order as above in get_maparg().
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2618 lhs = dict_get_string(d, (char_u *)"lhs", FALSE);
20522
729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset()
Bram Moolenaar <Bram@vim.org>
parents: 20516
diff changeset
2619 lhsraw = dict_get_string(d, (char_u *)"lhsraw", FALSE);
729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset()
Bram Moolenaar <Bram@vim.org>
parents: 20516
diff changeset
2620 lhsrawalt = dict_get_string(d, (char_u *)"lhsrawalt", FALSE);
729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset()
Bram Moolenaar <Bram@vim.org>
parents: 20516
diff changeset
2621 rhs = dict_get_string(d, (char_u *)"rhs", FALSE);
729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset()
Bram Moolenaar <Bram@vim.org>
parents: 20516
diff changeset
2622 if (lhs == NULL || lhsraw == NULL || rhs == NULL)
20506
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2623 {
26915
3631d2deb36c patch 8.2.3986: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents: 26913
diff changeset
2624 emsg(_(e_entries_missing_in_mapset_dict_argument));
20506
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2625 return;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2626 }
20516
d9e3fdf26cb9 patch 8.2.0812: mapset() does not properly handle <> notation
Bram Moolenaar <Bram@vim.org>
parents: 20510
diff changeset
2627 orig_rhs = rhs;
d9e3fdf26cb9 patch 8.2.0812: mapset() does not properly handle <> notation
Bram Moolenaar <Bram@vim.org>
parents: 20510
diff changeset
2628 rhs = replace_termcodes(rhs, &arg_buf,
d9e3fdf26cb9 patch 8.2.0812: mapset() does not properly handle <> notation
Bram Moolenaar <Bram@vim.org>
parents: 20510
diff changeset
2629 REPTERM_DO_LT | REPTERM_SPECIAL, NULL);
20506
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2630
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2631 noremap = dict_get_number(d, (char_u *)"noremap") ? REMAP_NONE: 0;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2632 if (dict_get_number(d, (char_u *)"script") != 0)
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2633 noremap = REMAP_SCRIPT;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2634 expr = dict_get_number(d, (char_u *)"expr") != 0;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2635 silent = dict_get_number(d, (char_u *)"silent") != 0;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2636 sid = dict_get_number(d, (char_u *)"sid");
27223
ea2b4cb4515b patch 8.2.4140: maparg() does not indicate the type of script
Bram Moolenaar <Bram@vim.org>
parents: 27221
diff changeset
2637 scriptversion = dict_get_number(d, (char_u *)"scriptversion");
20506
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2638 lnum = dict_get_number(d, (char_u *)"lnum");
24529
db2b4e867d06 patch 8.2.2804: setting buffer local mapping with mapset() changes global
Bram Moolenaar <Bram@vim.org>
parents: 23493
diff changeset
2639 buffer = dict_get_number(d, (char_u *)"buffer");
db2b4e867d06 patch 8.2.2804: setting buffer local mapping with mapset() changes global
Bram Moolenaar <Bram@vim.org>
parents: 23493
diff changeset
2640 nowait = dict_get_number(d, (char_u *)"nowait") != 0;
db2b4e867d06 patch 8.2.2804: setting buffer local mapping with mapset() changes global
Bram Moolenaar <Bram@vim.org>
parents: 23493
diff changeset
2641 // mode from the dict is not used
db2b4e867d06 patch 8.2.2804: setting buffer local mapping with mapset() changes global
Bram Moolenaar <Bram@vim.org>
parents: 23493
diff changeset
2642
db2b4e867d06 patch 8.2.2804: setting buffer local mapping with mapset() changes global
Bram Moolenaar <Bram@vim.org>
parents: 23493
diff changeset
2643 if (buffer)
20506
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2644 {
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2645 map_table = curbuf->b_maphash;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2646 abbr_table = &curbuf->b_first_abbr;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2647 }
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2648
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2649 // Delete any existing mapping for this lhs and mode.
24529
db2b4e867d06 patch 8.2.2804: setting buffer local mapping with mapset() changes global
Bram Moolenaar <Bram@vim.org>
parents: 23493
diff changeset
2650 if (buffer)
db2b4e867d06 patch 8.2.2804: setting buffer local mapping with mapset() changes global
Bram Moolenaar <Bram@vim.org>
parents: 23493
diff changeset
2651 {
db2b4e867d06 patch 8.2.2804: setting buffer local mapping with mapset() changes global
Bram Moolenaar <Bram@vim.org>
parents: 23493
diff changeset
2652 arg = alloc(STRLEN(lhs) + STRLEN("<buffer>") + 1);
db2b4e867d06 patch 8.2.2804: setting buffer local mapping with mapset() changes global
Bram Moolenaar <Bram@vim.org>
parents: 23493
diff changeset
2653 if (arg == NULL)
db2b4e867d06 patch 8.2.2804: setting buffer local mapping with mapset() changes global
Bram Moolenaar <Bram@vim.org>
parents: 23493
diff changeset
2654 return;
db2b4e867d06 patch 8.2.2804: setting buffer local mapping with mapset() changes global
Bram Moolenaar <Bram@vim.org>
parents: 23493
diff changeset
2655 STRCPY(arg, "<buffer>");
db2b4e867d06 patch 8.2.2804: setting buffer local mapping with mapset() changes global
Bram Moolenaar <Bram@vim.org>
parents: 23493
diff changeset
2656 STRCPY(arg + 8, lhs);
db2b4e867d06 patch 8.2.2804: setting buffer local mapping with mapset() changes global
Bram Moolenaar <Bram@vim.org>
parents: 23493
diff changeset
2657 }
db2b4e867d06 patch 8.2.2804: setting buffer local mapping with mapset() changes global
Bram Moolenaar <Bram@vim.org>
parents: 23493
diff changeset
2658 else
db2b4e867d06 patch 8.2.2804: setting buffer local mapping with mapset() changes global
Bram Moolenaar <Bram@vim.org>
parents: 23493
diff changeset
2659 {
db2b4e867d06 patch 8.2.2804: setting buffer local mapping with mapset() changes global
Bram Moolenaar <Bram@vim.org>
parents: 23493
diff changeset
2660 arg = vim_strsave(lhs);
db2b4e867d06 patch 8.2.2804: setting buffer local mapping with mapset() changes global
Bram Moolenaar <Bram@vim.org>
parents: 23493
diff changeset
2661 if (arg == NULL)
db2b4e867d06 patch 8.2.2804: setting buffer local mapping with mapset() changes global
Bram Moolenaar <Bram@vim.org>
parents: 23493
diff changeset
2662 return;
db2b4e867d06 patch 8.2.2804: setting buffer local mapping with mapset() changes global
Bram Moolenaar <Bram@vim.org>
parents: 23493
diff changeset
2663 }
20506
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2664 do_map(1, arg, mode, is_abbr);
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2665 vim_free(arg);
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2666
20522
729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset()
Bram Moolenaar <Bram@vim.org>
parents: 20516
diff changeset
2667 (void)map_add(map_table, abbr_table, lhsraw, rhs, orig_rhs, noremap,
27223
ea2b4cb4515b patch 8.2.4140: maparg() does not indicate the type of script
Bram Moolenaar <Bram@vim.org>
parents: 27221
diff changeset
2668 nowait, silent, mode, is_abbr, expr, sid, scriptversion, lnum, 0);
20522
729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset()
Bram Moolenaar <Bram@vim.org>
parents: 20516
diff changeset
2669 if (lhsrawalt != NULL)
729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset()
Bram Moolenaar <Bram@vim.org>
parents: 20516
diff changeset
2670 (void)map_add(map_table, abbr_table, lhsrawalt, rhs, orig_rhs, noremap,
27223
ea2b4cb4515b patch 8.2.4140: maparg() does not indicate the type of script
Bram Moolenaar <Bram@vim.org>
parents: 27221
diff changeset
2671 nowait, silent, mode, is_abbr, expr, sid, scriptversion,
ea2b4cb4515b patch 8.2.4140: maparg() does not indicate the type of script
Bram Moolenaar <Bram@vim.org>
parents: 27221
diff changeset
2672 lnum, 1);
20506
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2673 vim_free(keys_buf);
20516
d9e3fdf26cb9 patch 8.2.0812: mapset() does not properly handle <> notation
Bram Moolenaar <Bram@vim.org>
parents: 20510
diff changeset
2674 vim_free(arg_buf);
20506
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2675 }
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2676 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2677
20506
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping
Bram Moolenaar <Bram@vim.org>
parents: 20229
diff changeset
2678
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2679 #if defined(MSWIN) || defined(MACOS_X)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2680
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
2681 # define VIS_SEL (MODE_VISUAL | MODE_SELECT) // abbreviation
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2682
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2683 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2684 * Default mappings for some often used keys.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2685 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2686 struct initmap
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2687 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2688 char_u *arg;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2689 int mode;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2690 };
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2691
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2692 # ifdef FEAT_GUI_MSWIN
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2693 // Use the Windows (CUA) keybindings. (GUI)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2694 static struct initmap initmappings[] =
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2695 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2696 // paste, copy and cut
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
2697 {(char_u *)"<S-Insert> \"*P", MODE_NORMAL},
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2698 {(char_u *)"<S-Insert> \"-d\"*P", VIS_SEL},
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
2699 {(char_u *)"<S-Insert> <C-R><C-O>*", MODE_INSERT | MODE_CMDLINE},
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2700 {(char_u *)"<C-Insert> \"*y", VIS_SEL},
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2701 {(char_u *)"<S-Del> \"*d", VIS_SEL},
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2702 {(char_u *)"<C-Del> \"*d", VIS_SEL},
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2703 {(char_u *)"<C-X> \"*d", VIS_SEL},
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2704 // Missing: CTRL-C (cancel) and CTRL-V (block selection)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2705 };
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2706 # endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2707
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2708 # if defined(MSWIN) && (!defined(FEAT_GUI) || defined(VIMDLL))
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2709 // Use the Windows (CUA) keybindings. (Console)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2710 static struct initmap cinitmappings[] =
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2711 {
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
2712 {(char_u *)"\316w <C-Home>", MODE_NORMAL | VIS_SEL},
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
2713 {(char_u *)"\316w <C-Home>", MODE_INSERT | MODE_CMDLINE},
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
2714 {(char_u *)"\316u <C-End>", MODE_NORMAL | VIS_SEL},
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
2715 {(char_u *)"\316u <C-End>", MODE_INSERT | MODE_CMDLINE},
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2716
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2717 // paste, copy and cut
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2718 # ifdef FEAT_CLIPBOARD
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
2719 {(char_u *)"\316\324 \"*P", MODE_NORMAL}, // SHIFT-Insert is "*P
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2720 {(char_u *)"\316\324 \"-d\"*P", VIS_SEL}, // SHIFT-Insert is "-d"*P
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
2721 {(char_u *)"\316\324 \022\017*", MODE_INSERT}, // SHIFT-Insert is ^R^O*
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2722 {(char_u *)"\316\325 \"*y", VIS_SEL}, // CTRL-Insert is "*y
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2723 {(char_u *)"\316\327 \"*d", VIS_SEL}, // SHIFT-Del is "*d
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2724 {(char_u *)"\316\330 \"*d", VIS_SEL}, // CTRL-Del is "*d
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2725 {(char_u *)"\030 \"*d", VIS_SEL}, // CTRL-X is "*d
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2726 # else
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
2727 {(char_u *)"\316\324 P", MODE_NORMAL}, // SHIFT-Insert is P
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2728 {(char_u *)"\316\324 \"-dP", VIS_SEL}, // SHIFT-Insert is "-dP
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
2729 {(char_u *)"\316\324 \022\017\"", MODE_INSERT}, // SHIFT-Insert is ^R^O"
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2730 {(char_u *)"\316\325 y", VIS_SEL}, // CTRL-Insert is y
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2731 {(char_u *)"\316\327 d", VIS_SEL}, // SHIFT-Del is d
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2732 {(char_u *)"\316\330 d", VIS_SEL}, // CTRL-Del is d
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2733 # endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2734 };
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2735 # endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2736
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2737 # if defined(MACOS_X)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2738 static struct initmap initmappings[] =
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2739 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2740 // Use the Standard MacOS binding.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2741 // paste, copy and cut
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
2742 {(char_u *)"<D-v> \"*P", MODE_NORMAL},
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2743 {(char_u *)"<D-v> \"-d\"*P", VIS_SEL},
28773
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named
Bram Moolenaar <Bram@vim.org>
parents: 28686
diff changeset
2744 {(char_u *)"<D-v> <C-R>*", MODE_INSERT | MODE_CMDLINE},
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2745 {(char_u *)"<D-c> \"*y", VIS_SEL},
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2746 {(char_u *)"<D-x> \"*d", VIS_SEL},
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2747 {(char_u *)"<Backspace> \"-d", VIS_SEL},
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2748 };
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2749 # endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2750
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2751 # undef VIS_SEL
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2752 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2753
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2754 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2755 * Set up default mappings.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2756 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2757 void
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2758 init_mappings(void)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2759 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2760 #if defined(MSWIN) || defined(MACOS_X)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2761 int i;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2762
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2763 # if defined(MSWIN) && (!defined(FEAT_GUI_MSWIN) || defined(VIMDLL))
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2764 # ifdef VIMDLL
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2765 if (!gui.starting)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2766 # endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2767 {
24768
7334bf933510 patch 8.2.2922: computing array length is done in various ways
Bram Moolenaar <Bram@vim.org>
parents: 24574
diff changeset
2768 for (i = 0; i < (int)ARRAY_LENGTH(cinitmappings); ++i)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2769 add_map(cinitmappings[i].arg, cinitmappings[i].mode);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2770 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2771 # endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2772 # if defined(FEAT_GUI_MSWIN) || defined(MACOS_X)
24768
7334bf933510 patch 8.2.2922: computing array length is done in various ways
Bram Moolenaar <Bram@vim.org>
parents: 24574
diff changeset
2773 for (i = 0; i < (int)ARRAY_LENGTH(initmappings); ++i)
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2774 add_map(initmappings[i].arg, initmappings[i].mode);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2775 # endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2776 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2777 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2778
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2779 #if defined(MSWIN) || defined(FEAT_CMDWIN) || defined(MACOS_X) \
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2780 || defined(PROTO)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2781 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2782 * Add a mapping "map" for mode "mode".
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2783 * Need to put string in allocated memory, because do_map() will modify it.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2784 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2785 void
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2786 add_map(char_u *map, int mode)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2787 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2788 char_u *s;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2789 char_u *cpo_save = p_cpo;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2790
23493
f8382c4e6551 patch 8.2.2289: Vim9: 'cpo' can become empty
Bram Moolenaar <Bram@vim.org>
parents: 23229
diff changeset
2791 p_cpo = empty_option; // Allow <> notation
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2792 s = vim_strsave(map);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2793 if (s != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2794 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2795 (void)do_map(0, s, mode, FALSE);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2796 vim_free(s);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2797 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2798 p_cpo = cpo_save;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2799 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2800 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2801
17940
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2802 #if defined(FEAT_LANGMAP) || defined(PROTO)
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2803 /*
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2804 * Any character has an equivalent 'langmap' character. This is used for
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2805 * keyboards that have a special language mode that sends characters above
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2806 * 128 (although other characters can be translated too). The "to" field is a
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2807 * Vim command character. This avoids having to switch the keyboard back to
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2808 * ASCII mode when leaving Insert mode.
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2809 *
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2810 * langmap_mapchar[] maps any of 256 chars to an ASCII char used for Vim
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2811 * commands.
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2812 * langmap_mapga.ga_data is a sorted table of langmap_entry_T. This does the
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2813 * same as langmap_mapchar[] for characters >= 256.
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2814 *
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2815 * Use growarray for 'langmap' chars >= 256
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2816 */
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2817 typedef struct
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2818 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2819 int from;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2820 int to;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2821 } langmap_entry_T;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2822
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2823 static garray_T langmap_mapga;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2824
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2825 /*
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2826 * Search for an entry in "langmap_mapga" for "from". If found set the "to"
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2827 * field. If not found insert a new entry at the appropriate location.
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2828 */
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2829 static void
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2830 langmap_set_entry(int from, int to)
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2831 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2832 langmap_entry_T *entries = (langmap_entry_T *)(langmap_mapga.ga_data);
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2833 int a = 0;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2834 int b = langmap_mapga.ga_len;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2835
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2836 // Do a binary search for an existing entry.
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2837 while (a != b)
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2838 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2839 int i = (a + b) / 2;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2840 int d = entries[i].from - from;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2841
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2842 if (d == 0)
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2843 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2844 entries[i].to = to;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2845 return;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2846 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2847 if (d < 0)
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2848 a = i + 1;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2849 else
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2850 b = i;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2851 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2852
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2853 if (ga_grow(&langmap_mapga, 1) != OK)
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2854 return; // out of memory
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2855
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2856 // insert new entry at position "a"
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2857 entries = (langmap_entry_T *)(langmap_mapga.ga_data) + a;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2858 mch_memmove(entries + 1, entries,
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2859 (langmap_mapga.ga_len - a) * sizeof(langmap_entry_T));
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2860 ++langmap_mapga.ga_len;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2861 entries[0].from = from;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2862 entries[0].to = to;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2863 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2864
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2865 /*
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2866 * Apply 'langmap' to multi-byte character "c" and return the result.
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2867 */
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2868 int
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2869 langmap_adjust_mb(int c)
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2870 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2871 langmap_entry_T *entries = (langmap_entry_T *)(langmap_mapga.ga_data);
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2872 int a = 0;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2873 int b = langmap_mapga.ga_len;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2874
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2875 while (a != b)
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2876 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2877 int i = (a + b) / 2;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2878 int d = entries[i].from - c;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2879
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2880 if (d == 0)
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2881 return entries[i].to; // found matching entry
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2882 if (d < 0)
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2883 a = i + 1;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2884 else
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2885 b = i;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2886 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2887 return c; // no entry found, return "c" unmodified
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2888 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2889
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2890 void
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2891 langmap_init(void)
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2892 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2893 int i;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2894
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2895 for (i = 0; i < 256; i++)
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2896 langmap_mapchar[i] = i; // we init with a one-to-one map
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2897 ga_init2(&langmap_mapga, sizeof(langmap_entry_T), 8);
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2898 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2899
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2900 /*
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2901 * Called when langmap option is set; the language map can be
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2902 * changed at any time!
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2903 */
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2904 void
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2905 langmap_set(void)
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2906 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2907 char_u *p;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2908 char_u *p2;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2909 int from, to;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2910
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2911 ga_clear(&langmap_mapga); // clear the previous map first
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2912 langmap_init(); // back to one-to-one map
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2913
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2914 for (p = p_langmap; p[0] != NUL; )
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2915 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2916 for (p2 = p; p2[0] != NUL && p2[0] != ',' && p2[0] != ';';
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2917 MB_PTR_ADV(p2))
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2918 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2919 if (p2[0] == '\\' && p2[1] != NUL)
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2920 ++p2;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2921 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2922 if (p2[0] == ';')
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2923 ++p2; // abcd;ABCD form, p2 points to A
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2924 else
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2925 p2 = NULL; // aAbBcCdD form, p2 is NULL
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2926 while (p[0])
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2927 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2928 if (p[0] == ',')
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2929 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2930 ++p;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2931 break;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2932 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2933 if (p[0] == '\\' && p[1] != NUL)
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2934 ++p;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2935 from = (*mb_ptr2char)(p);
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2936 to = NUL;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2937 if (p2 == NULL)
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2938 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2939 MB_PTR_ADV(p);
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2940 if (p[0] != ',')
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2941 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2942 if (p[0] == '\\')
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2943 ++p;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2944 to = (*mb_ptr2char)(p);
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2945 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2946 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2947 else
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2948 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2949 if (p2[0] != ',')
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2950 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2951 if (p2[0] == '\\')
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2952 ++p2;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2953 to = (*mb_ptr2char)(p2);
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2954 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2955 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2956 if (to == NUL)
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2957 {
26913
d4e61d61afd9 patch 8.2.3985: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents: 26877
diff changeset
2958 semsg(_(e_langmap_matching_character_missing_for_str),
17940
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2959 transchar(from));
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2960 return;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2961 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2962
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2963 if (from >= 256)
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2964 langmap_set_entry(from, to);
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2965 else
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2966 langmap_mapchar[from & 255] = to;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2967
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2968 // Advance to next pair
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2969 MB_PTR_ADV(p);
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2970 if (p2 != NULL)
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2971 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2972 MB_PTR_ADV(p2);
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2973 if (*p == ';')
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2974 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2975 p = p2;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2976 if (p[0] != NUL)
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2977 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2978 if (p[0] != ',')
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2979 {
26913
d4e61d61afd9 patch 8.2.3985: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents: 26877
diff changeset
2980 semsg(_(e_langmap_extra_characters_after_semicolon_str), p);
17940
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2981 return;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2982 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2983 ++p;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2984 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2985 break;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2986 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2987 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2988 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2989 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2990 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2991 #endif
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere
Bram Moolenaar <Bram@vim.org>
parents: 17781
diff changeset
2992
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2993 static void
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2994 do_exmap(exarg_T *eap, int isabbrev)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2995 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2996 int mode;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2997 char_u *cmdp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2998
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2999 cmdp = eap->cmd;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3000 mode = get_map_mode(&cmdp, eap->forceit || isabbrev);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3001
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3002 switch (do_map((*cmdp == 'n') ? 2 : (*cmdp == 'u'),
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3003 eap->arg, mode, isabbrev))
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3004 {
26865
bce848ec8b1b patch 8.2.3961: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents: 26861
diff changeset
3005 case 1: emsg(_(e_invalid_argument));
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3006 break;
25306
078edc1821bf patch 8.2.3190: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
3007 case 2: emsg((isabbrev ? _(e_no_such_abbreviation)
078edc1821bf patch 8.2.3190: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
3008 : _(e_no_such_mapping)));
17576
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3009 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3010 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3011 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3012
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3013 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3014 * ":abbreviate" and friends.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3015 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3016 void
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3017 ex_abbreviate(exarg_T *eap)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3018 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3019 do_exmap(eap, TRUE); // almost the same as mapping
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3020 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3021
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3022 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3023 * ":map" and friends.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3024 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3025 void
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3026 ex_map(exarg_T *eap)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3027 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3028 // If we are sourcing .exrc or .vimrc in current directory we
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3029 // print the mappings for security reasons.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3030 if (secure)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3031 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3032 secure = 2;
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3033 msg_outtrans(eap->cmd);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3034 msg_putchar('\n');
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3035 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3036 do_exmap(eap, FALSE);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3037 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3038
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3039 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3040 * ":unmap" and friends.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3041 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3042 void
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3043 ex_unmap(exarg_T *eap)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3044 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3045 do_exmap(eap, FALSE);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3046 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3047
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3048 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3049 * ":mapclear" and friends.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3050 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3051 void
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3052 ex_mapclear(exarg_T *eap)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3053 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3054 map_clear(eap->cmd, eap->arg, eap->forceit, FALSE);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3055 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3056
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3057 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3058 * ":abclear" and friends.
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3059 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3060 void
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3061 ex_abclear(exarg_T *eap)
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3062 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3063 map_clear(eap->cmd, eap->arg, TRUE, TRUE);
97a750e8707f patch 8.1.1785: map functionality mixed with character input
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3064 }