vim: src/map.c annotate

annotate src/map.c @ 30299:5c181bb6c855

patch 9.0.0485: in :def function all closures in loop get the same variables Commit: https://github.com/vim/vim/commit/0cdfb7ce462393595b0308dcabf343e82f05319d Author: Bram Moolenaar <Bram@vim.org> Date: Sat Sep 17 15:44:52 2022 +0100 patch 9.0.0485: in :def function all closures in loop get the same variables Problem: In a :def function all closures in a loop get the same variables. Solution: Make a copy of loop variables used in a closure.

author	Bram Moolenaar <Bram@vim.org>
date	Sat, 17 Sep 2022 16:45:04 +0200
parents	b6b803ed4a53
children	37aa9fd2ed72

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 *
29173 1ec1ba7e7728 patch 8.2.5106: default cmdwin mappings are re-mappable Bram Moolenaar <Bram@vim.org> parents: 29014 diff changeset	296 * maptype: MAPTYPE_MAP for :map
1ec1ba7e7728 patch 8.2.5106: default cmdwin mappings are re-mappable Bram Moolenaar <Bram@vim.org> parents: 29014 diff changeset	297 * MAPTYPE_UNMAP for :unmap
1ec1ba7e7728 patch 8.2.5106: default cmdwin mappings are re-mappable Bram Moolenaar <Bram@vim.org> parents: 29014 diff changeset	298 * MAPTYPE_NOREMAP for noremap
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	299 *
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	300 * 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	301 * it will be modified.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	302 *
28773 d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named Bram Moolenaar <Bram@vim.org> parents: 28686 diff changeset	303 * 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	304 * 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	305 * 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	306 * 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	307 * 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	308 * 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	309 * 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	310 * 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	311 * 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	312 * 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	313 * 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	314 *
28773 d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named Bram Moolenaar <Bram@vim.org> parents: 28686 diff changeset	315 * 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	316 * 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	317 * 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	318 *
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	319 * Return 0 for success
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	320 * 1 for invalid arguments
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	321 * 2 for no match
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	322 * 4 for out of mem
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	323 * 5 for entry not unique
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	324 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	325 int
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	326 do_map(
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	327 int maptype,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	328 char_u *arg,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	329 int mode,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	330 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	331 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	332 char_u *keys;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	333 mapblock_T mp, *mpp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	334 char_u *rhs;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	335 char_u *p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	336 int n;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	337 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	338 int hasarg;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	339 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	340 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	341 int keyround;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	342 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	343 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	344 char_u *arg_buf = NULL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	345 int retval = 0;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	346 int do_backslash;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	347 mapblock_T **abbr_table;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	348 mapblock_T **map_table;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	349 int unique = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	350 int nowait = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	351 int silent = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	352 int special = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	353 #ifdef FEAT_EVAL
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	354 int expr = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	355 #endif
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	356 int did_simplify = FALSE;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	357 int noremap;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	358 char_u *orig_rhs;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	359
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	360 keys = arg;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	361 map_table = maphash;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	362 abbr_table = &first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	363
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	364 // For ":noremap" don't remap, otherwise do remap.
29173 1ec1ba7e7728 patch 8.2.5106: default cmdwin mappings are re-mappable Bram Moolenaar <Bram@vim.org> parents: 29014 diff changeset	365 if (maptype == MAPTYPE_NOREMAP)
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	366 noremap = REMAP_NONE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	367 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	368 noremap = REMAP_YES;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	369
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	370 // 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	371 // any order.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	372 for (;;)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	373 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	374 // 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	375 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	376 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	377 keys = skipwhite(keys + 8);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	378 map_table = curbuf->b_maphash;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	379 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	380 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	381 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	382
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	383 // 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	384 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	385 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	386 keys = skipwhite(keys + 8);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	387 nowait = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	388 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	389 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	390
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	391 // 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	392 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	393 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	394 keys = skipwhite(keys + 8);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	395 silent = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	396 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	397 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	398
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	399 // 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	400 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	401 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	402 keys = skipwhite(keys + 9);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	403 special = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	404 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	405 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	406
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	407 #ifdef FEAT_EVAL
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	408 // 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	409 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	410 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	411 keys = skipwhite(keys + 8);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	412 noremap = REMAP_SCRIPT;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	413 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	414 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	415
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	416 // 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	417 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	418 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	419 keys = skipwhite(keys + 6);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	420 expr = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	421 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	422 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	423 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	424 // 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	425 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	426 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	427 keys = skipwhite(keys + 8);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	428 unique = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	429 continue;
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 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	432 }
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 validate_maphash();
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	435
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	436 // 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	437 // 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	438 // 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	439 p = keys;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	440 do_backslash = (vim_strchr(p_cpo, CPO_BSLASH) == NULL);
29173 1ec1ba7e7728 patch 8.2.5106: default cmdwin mappings are re-mappable Bram Moolenaar <Bram@vim.org> parents: 29014 diff changeset	441 while (p && (maptype == MAPTYPE_UNMAP \|\| !VIM_ISWHITE(p)))
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	442 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	443 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	444 p[1] != NUL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	445 ++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	446 ++p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	447 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	448 if (*p != NUL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	449 *p++ = NUL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	450
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	451 p = skipwhite(p);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	452 rhs = p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	453 hasarg = (*rhs != NUL);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	454 haskey = (*keys != NUL);
29173 1ec1ba7e7728 patch 8.2.5106: default cmdwin mappings are re-mappable Bram Moolenaar <Bram@vim.org> parents: 29014 diff changeset	455 do_print = !haskey \|\| (maptype != MAPTYPE_UNMAP && !hasarg);
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	456
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	457 // check for :unmap without argument
29173 1ec1ba7e7728 patch 8.2.5106: default cmdwin mappings are re-mappable Bram Moolenaar <Bram@vim.org> parents: 29014 diff changeset	458 if (maptype == MAPTYPE_UNMAP && !haskey)
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	459 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	460 retval = 1;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	461 goto theend;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	462 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	463
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	464 // 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	465 // 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	466 // 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	467 // 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	468 // 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	469 // 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	470 // 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	471 // 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	472 // modifyOtherKeys is working.
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	473 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	474 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	475 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	476 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	477
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	478 if (special)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	479 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	480 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	481 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	482 (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	483 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	484 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	485 }
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	486 orig_rhs = rhs;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	487 if (hasarg)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	488 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	489 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	490 rhs = (char_u *)"";
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	491 else
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	492 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	493 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	494 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	495
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	496 /*
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	497 * 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	498 * "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	499 */
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	500 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	501 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	502 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	503 int did_local = FALSE;
28606 893af4a8fc08 patch 8.2.4827: typo in variable name Bram Moolenaar <Bram@vim.org> parents: 28602 diff changeset	504 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	505 int round;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	506 int hash;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	507 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	508
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	509 if (keyround == 2)
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	510 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	511 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	512 break;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	513 keys = alt_keys_buf;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	514 }
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	515 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	516 // 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	517 keys = alt_keys_buf;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	518
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	519 // 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	520 if (haskey)
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	521 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	522 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	523 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	524 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	525 retval = 1;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	526 goto theend;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	527 }
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	528
29173 1ec1ba7e7728 patch 8.2.5106: default cmdwin mappings are re-mappable Bram Moolenaar <Bram@vim.org> parents: 29014 diff changeset	529 if (abbrev && maptype != MAPTYPE_UNMAP)
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	530 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	531 // 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	532 // 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	533 // 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	534 // 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	535 if (has_mbyte)
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	536 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	537 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	538 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	539
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	540 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	541 last = first;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	542 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	543 n = 1;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	544 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	545 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	546 ++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	547 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	548 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	549 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	550 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	551 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	552 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	553 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	554 retval = 1;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	555 goto theend;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	556 }
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	557 }
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	558 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	559 // ends in keyword char
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	560 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	561 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	562 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	563 retval = 1;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	564 goto theend;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	565 }
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	566 // 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	567 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	568 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	569 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	570 retval = 1;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	571 goto theend;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	572 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	573 }
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	574 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	575
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	576 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	577 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	578 // no abbreviations
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	579
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	580 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	581 msg_start();
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	582
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	583 // 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	584 if (unique && map_table == curbuf->b_maphash
29173 1ec1ba7e7728 patch 8.2.5106: default cmdwin mappings are re-mappable Bram Moolenaar <Bram@vim.org> parents: 29014 diff changeset	585 && haskey && hasarg && maptype != MAPTYPE_UNMAP)
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	586 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	587 // 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	588 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	589 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	590 if (abbrev)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	591 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	592 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	593 break;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	594 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	595 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	596 else
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	597 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	598 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	599 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	600 // 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	601 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	602 && 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	603 && 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	604 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	605 if (abbrev)
26861 df2de1e63de0 patch 8.2.3959: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 26224 diff changeset	606 semsg(
df2de1e63de0 patch 8.2.3959: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 26224 diff changeset	607 _(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	608 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	609 else
26861 df2de1e63de0 patch 8.2.3959: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 26224 diff changeset	610 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	611 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	612 retval = 5;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	613 goto theend;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	614 }
17576 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 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	617 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	618
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	619 // When listing global mappings, also list buffer-local ones here.
29173 1ec1ba7e7728 patch 8.2.5106: default cmdwin mappings are re-mappable Bram Moolenaar <Bram@vim.org> parents: 29014 diff changeset	620 if (map_table != curbuf->b_maphash && !hasarg
1ec1ba7e7728 patch 8.2.5106: default cmdwin mappings are re-mappable Bram Moolenaar <Bram@vim.org> parents: 29014 diff changeset	621 && maptype != MAPTYPE_UNMAP)
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 // 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	624 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	625 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	626 if (abbrev)
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	627 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	628 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	629 break;
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_first_abbr;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	631 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	632 else
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	633 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	634 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	635 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	636 // 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	637 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	638 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	639 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	640 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	641 showmap(mp, TRUE);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	642 did_local = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	643 }
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	644 else
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	645 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	646 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	647 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	648 (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	649 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	650 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	651 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	652 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	653 }
17576 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 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	656 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	657 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	658
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	659 // 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	660 // 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	661 // 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	662 // 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	663 // ":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	664 // be replaced by "bar" because of the abbreviation.
29173 1ec1ba7e7728 patch 8.2.5106: default cmdwin mappings are re-mappable Bram Moolenaar <Bram@vim.org> parents: 29014 diff changeset	665 for (round = 0; (round == 0 \|\| maptype == MAPTYPE_UNMAP) && round <= 1
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	666 && !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	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 // 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	669 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	670 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	671 if (abbrev)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	672 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	673 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	674 break;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	675 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	676 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	677 else
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	678 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	679 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	680 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	681
18329 1784afa654c8 patch 8.1.2159: some mappings are listed twice Bram Moolenaar <Bram@vim.org> parents: 18301 diff changeset	682 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	683 {
18329 1784afa654c8 patch 8.1.2159: some mappings are listed twice Bram Moolenaar <Bram@vim.org> parents: 18301 diff changeset	684 // 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	685 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	686 continue;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	687 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	688 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	689 {
18329 1784afa654c8 patch 8.1.2159: some mappings are listed twice Bram Moolenaar <Bram@vim.org> parents: 18301 diff changeset	690 if (!mp->m_simplified)
1784afa654c8 patch 8.1.2159: some mappings are listed twice Bram Moolenaar <Bram@vim.org> parents: 18301 diff changeset	691 {
1784afa654c8 patch 8.1.2159: some mappings are listed twice Bram Moolenaar <Bram@vim.org> parents: 18301 diff changeset	692 showmap(mp, map_table != maphash);
1784afa654c8 patch 8.1.2159: some mappings are listed twice Bram Moolenaar <Bram@vim.org> parents: 18301 diff changeset	693 did_it = TRUE;
1784afa654c8 patch 8.1.2159: some mappings are listed twice Bram Moolenaar <Bram@vim.org> parents: 18301 diff changeset	694 }
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	695 }
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	696 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	697 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	698 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	699 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	700 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	701 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	702 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	703 else
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 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	706 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	707 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	708 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	709 {
29173 1ec1ba7e7728 patch 8.2.5106: default cmdwin mappings are re-mappable Bram Moolenaar <Bram@vim.org> parents: 29014 diff changeset	710 if (maptype == MAPTYPE_UNMAP)
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	711 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	712 // Delete entry.
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	713 // 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	714 // 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	715 // 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	716 // trailing space.
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	717 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	718 \|\| *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	719 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	720 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	721 continue;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	722 }
28608 9ae7ccd90041 patch 8.2.4828: fix for unmapping simplified key not fully tested Bram Moolenaar <Bram@vim.org> parents: 28606 diff changeset	723 // 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	724 // 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	725 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	726 break;
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	727 // 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	728 // 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	729 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	730 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	731 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	732 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	733 {
18329 1784afa654c8 patch 8.1.2159: some mappings are listed twice Bram Moolenaar <Bram@vim.org> parents: 18301 diff changeset	734 if (!mp->m_simplified)
1784afa654c8 patch 8.1.2159: some mappings are listed twice Bram Moolenaar <Bram@vim.org> parents: 18301 diff changeset	735 {
1784afa654c8 patch 8.1.2159: some mappings are listed twice Bram Moolenaar <Bram@vim.org> parents: 18301 diff changeset	736 showmap(mp, map_table != maphash);
1784afa654c8 patch 8.1.2159: some mappings are listed twice Bram Moolenaar <Bram@vim.org> parents: 18301 diff changeset	737 did_it = TRUE;
1784afa654c8 patch 8.1.2159: some mappings are listed twice Bram Moolenaar <Bram@vim.org> parents: 18301 diff changeset	738 }
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	739 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	740 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	741 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	742 mpp = &(mp->m_next);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	743 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	744 }
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	745 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	746 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	747 if (abbrev)
26861 df2de1e63de0 patch 8.2.3959: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 26224 diff changeset	748 semsg(
df2de1e63de0 patch 8.2.3959: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 26224 diff changeset	749 _(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	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 else
26861 df2de1e63de0 patch 8.2.3959: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 26224 diff changeset	752 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	753 p);
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	754 retval = 5;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	755 goto theend;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	756 }
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	757 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	758 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	759 // 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	760 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	761 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	762 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	763 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	764
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	765 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	766 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	767 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	768 goto theend;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	769 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	770 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	771 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	772 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	773 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	774 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	775 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	776 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	777 mp->m_mode = mode;
28606 893af4a8fc08 patch 8.2.4827: typo in variable name Bram Moolenaar <Bram@vim.org> parents: 28602 diff changeset	778 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	779 #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	780 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	781 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	782 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	783 #endif
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	784 did_it = TRUE;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	785 }
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	786 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	787 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	788 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	789 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	790 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	791 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	792
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	793 // 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	794 // list.
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	795 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	796 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	797 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	798 *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	799 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	800 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	801
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	802 continue; // continue with *mpp
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	803 }
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 }
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	806 mpp = &(mp->m_next);
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	807 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	808 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	809 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	810
29173 1ec1ba7e7728 patch 8.2.5106: default cmdwin mappings are re-mappable Bram Moolenaar <Bram@vim.org> parents: 29014 diff changeset	811 if (maptype == MAPTYPE_UNMAP)
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	812 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	813 // delete entry
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	814 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	815 {
28606 893af4a8fc08 patch 8.2.4827: typo in variable name Bram Moolenaar <Bram@vim.org> parents: 28602 diff changeset	816 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	817 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	818 }
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	819 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	820 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	821 // 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	822 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	823 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	824 else
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	825 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	826 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	827 continue;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	828 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	829
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	830 if (!haskey \|\| !hasarg)
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	831 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	832 // print entries
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	833 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	834 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	835 if (abbrev)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	836 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	837 else
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	838 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	839 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	840 goto theend; // listing finished
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	841 }
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 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	844 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	845
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	846 // 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	847 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	848 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	849 #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	850 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	851 #endif
28606 893af4a8fc08 patch 8.2.4827: typo in variable name Bram Moolenaar <Bram@vim.org> parents: 28602 diff changeset	852 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	853 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	854 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	855 goto theend;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	856 }
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	857 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	858
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	859 theend:
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	860 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	861 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	862 vim_free(arg_buf);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	863 return retval;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	864 }
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 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	867 * 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	868 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	869 static int
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	870 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	871 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	872 char_u *p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	873 int modec;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	874 int mode;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	875
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	876 p = *cmdp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	877 modec = *p++;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	878 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	879 mode = MODE_INSERT; // :imap
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	880 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	881 mode = MODE_LANGMAP; // :lmap
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	882 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	883 mode = MODE_CMDLINE; // :cmap
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	884 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	885 mode = MODE_NORMAL; // :nmap
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	886 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	887 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	888 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	889 mode = MODE_VISUAL; // :xmap
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	890 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	891 mode = MODE_SELECT; // :smap
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	892 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	893 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	894 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	895 mode = MODE_TERMINAL; // :tmap
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	896 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	897 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	898 --p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	899 if (forceit)
28773 d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named Bram Moolenaar <Bram@vim.org> parents: 28686 diff changeset	900 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	901 else
28773 d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named Bram Moolenaar <Bram@vim.org> parents: 28686 diff changeset	902 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	903 // :map
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	904 }
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 *cmdp = p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	907 return mode;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	908 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	909
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	910 /*
29318 fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	911 * Clear all mappings (":mapclear") or abbreviations (":abclear").
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	912 * "abbr" should be FALSE for mappings, TRUE for abbreviations.
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	913 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	914 static void
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	915 map_clear(
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	916 char_u *cmdp,
29318 fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	917 char_u *arg,
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	918 int forceit,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	919 int abbr)
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 int mode;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	922 int local;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	923
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	924 local = (STRCMP(arg, "<buffer>") == 0);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	925 if (!local && *arg != NUL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	926 {
26865 bce848ec8b1b patch 8.2.3961: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 26861 diff changeset	927 emsg(_(e_invalid_argument));
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	928 return;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	929 }
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 mode = get_map_mode(&cmdp, forceit);
29318 fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	932 map_clear_mode(curbuf, mode, local, abbr);
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	933 }
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 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	936 * Clear all mappings in "mode".
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	937 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	938 void
29318 fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	939 map_clear_mode(
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	940 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	941 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	942 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	943 int abbr) // TRUE for abbreviations
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	944 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	945 mapblock_T mp, *mpp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	946 int hash;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	947 int new_hash;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	948
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	949 validate_maphash();
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	950
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	951 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	952 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	953 if (abbr)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	954 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	955 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	956 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	957 if (local)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	958 mpp = &buf->b_first_abbr;
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 mpp = &first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	961 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	962 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	963 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	964 if (local)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	965 mpp = &buf->b_maphash[hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	966 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	967 mpp = &maphash[hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	968 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	969 while (*mpp != NULL)
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 = *mpp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	972 if (mp->m_mode & mode)
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 mp->m_mode &= ~mode;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	975 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	976 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	977 map_free(mpp);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	978 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	979 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	980 // 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	981 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	982 if (!abbr && new_hash != hash)
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 *mpp = mp->m_next;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	985 if (local)
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 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	988 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	989 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	990 else
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 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	993 maphash[new_hash] = mp;
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 continue; // continue with *mpp
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 mpp = &(mp->m_next);
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 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1001 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1002
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1003 #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	1004 int
17946 ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes Bram Moolenaar <Bram@vim.org> parents: 17940 diff changeset	1005 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	1006 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1007 int mode = 0;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1008
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1009 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	1010 mode \|= MODE_NORMAL;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1011 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	1012 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	1013 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	1014 mode \|= MODE_VISUAL;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1015 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	1016 mode \|= MODE_SELECT;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1017 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	1018 mode \|= MODE_OP_PENDING;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1019 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	1020 mode \|= MODE_INSERT;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1021 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	1022 mode \|= MODE_LANGMAP;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1023 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	1024 mode \|= MODE_CMDLINE;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1025
17946 ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes Bram Moolenaar <Bram@vim.org> parents: 17940 diff changeset	1026 return mode;
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes Bram Moolenaar <Bram@vim.org> parents: 17940 diff changeset	1027 }
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes Bram Moolenaar <Bram@vim.org> parents: 17940 diff changeset	1028
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes Bram Moolenaar <Bram@vim.org> parents: 17940 diff changeset	1029 /*
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes Bram Moolenaar <Bram@vim.org> parents: 17940 diff changeset	1030 * 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	1031 * 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	1032 * 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	1033 */
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes Bram Moolenaar <Bram@vim.org> parents: 17940 diff changeset	1034 int
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes Bram Moolenaar <Bram@vim.org> parents: 17940 diff changeset	1035 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	1036 {
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes Bram Moolenaar <Bram@vim.org> parents: 17940 diff changeset	1037 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	1038 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	1039 int retval;
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes Bram Moolenaar <Bram@vim.org> parents: 17940 diff changeset	1040
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	1041 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	1042
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes Bram Moolenaar <Bram@vim.org> parents: 17940 diff changeset	1043 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	1044 vim_free(buf);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1045
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1046 return retval;
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 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1049
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 * 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	1052 * 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	1053 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1054 int
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1055 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	1056 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1057 mapblock_T *mp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1058 int hash;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1059 int exp_buffer = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1060
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1061 validate_maphash();
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 // 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	1064 for (;;)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1065 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1066 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	1067 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1068 if (abbr)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1069 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1070 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	1071 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1072 if (exp_buffer)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1073 mp = curbuf->b_first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1074 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1075 mp = first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1076 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1077 else if (exp_buffer)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1078 mp = curbuf->b_maphash[hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1079 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1080 mp = maphash[hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1081 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	1082 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1083 if ((mp->m_mode & mode)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1084 && 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	1085 return TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1086 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1087 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1088 if (exp_buffer)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1089 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1090 exp_buffer = TRUE;
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 return FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1094 }
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 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1097 * 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	1098 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1099 static int expand_mapmodes = 0;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1100 static int expand_isabbrev = 0;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1101 static int expand_buffer = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1102
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1103 /*
19178 f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1104 * 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	1105 * 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	1106 * 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	1107 *
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1108 * 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	1109 * command-line.
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1110 *
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1111 * 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	1112 * 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	1113 * afterwards.
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1114 *
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1115 * 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	1116 */
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1117 static char_u *
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1118 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	1119 {
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1120 garray_T ga;
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1121 int c;
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1122 int modifiers;
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1123 int cpo_bslash;
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1124 int cpo_special;
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1125
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1126 ga_init(&ga);
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1127 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	1128 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	1129
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1130 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	1131 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	1132
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1133 for (; *str; ++str)
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 c = *str;
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1136 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	1137 {
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1138 modifiers = 0;
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1139 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	1140 {
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1141 str++;
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1142 modifiers = *++str;
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1143 c = *++str;
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1144 }
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1145 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	1146 {
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1147 if (cpo_special)
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 ga_clear(&ga);
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1150 return NULL;
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1151 }
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1152 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	1153 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	1154 c = NUL;
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1155 str += 2;
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1156 }
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1157 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	1158 {
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1159 if (cpo_special)
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_clear(&ga);
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1162 return NULL;
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 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	1165 continue; // for (str)
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1166 }
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1167 }
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1168 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	1169 \|\| (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	1170 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	1171 if (c)
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1172 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	1173 }
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1174 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	1175 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	1176 }
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1177
f7081bd2680e patch 8.2.0148: mapping related function in wrong source file Bram Moolenaar <Bram@vim.org> parents: 19075 diff changeset	1178 /*
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1179 * 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	1180 * or abbreviation names.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1181 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1182 char_u *
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1183 set_context_in_map_cmd(
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1184 expand_T *xp,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1185 char_u *cmd,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1186 char_u *arg,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1187 int forceit, // TRUE if '!' given
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1188 int isabbrev, // TRUE if abbreviation
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1189 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	1190 cmdidx_T cmdidx)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1191 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1192 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	1193 xp->xp_context = EXPAND_NOTHING;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1194 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1195 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1196 if (isunmap)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1197 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	1198 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1199 {
28773 d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named Bram Moolenaar <Bram@vim.org> parents: 28686 diff changeset	1200 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	1201 if (!isabbrev)
28773 d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named Bram Moolenaar <Bram@vim.org> parents: 28686 diff changeset	1202 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	1203 \| MODE_OP_PENDING;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1204 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1205 expand_isabbrev = isabbrev;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1206 xp->xp_context = EXPAND_MAPPINGS;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1207 expand_buffer = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1208 for (;;)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1209 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1210 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	1211 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1212 expand_buffer = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1213 arg = skipwhite(arg + 8);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1214 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1215 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1216 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	1217 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1218 arg = skipwhite(arg + 8);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1219 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1220 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1221 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	1222 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1223 arg = skipwhite(arg + 8);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1224 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1225 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1226 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	1227 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1228 arg = skipwhite(arg + 8);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1229 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1230 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1231 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	1232 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1233 arg = skipwhite(arg + 9);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1234 continue;
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 #ifdef FEAT_EVAL
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1237 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	1238 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1239 arg = skipwhite(arg + 8);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1240 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1241 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1242 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	1243 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1244 arg = skipwhite(arg + 6);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1245 continue;
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 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1248 break;
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 xp->xp_pattern = arg;
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 return NULL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1254 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1255
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1256 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1257 * 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	1258 * 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	1259 * 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	1260 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1261 int
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1262 ExpandMappings(
27908 099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations Bram Moolenaar <Bram@vim.org> parents: 27750 diff changeset	1263 char_u *pat,
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1264 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	1265 int *numMatches,
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations Bram Moolenaar <Bram@vim.org> parents: 27750 diff changeset	1266 char_u ***matches)
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1267 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1268 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	1269 garray_T ga;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1270 int hash;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1271 int count;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1272 char_u *p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1273 int i;
27908 099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations Bram Moolenaar <Bram@vim.org> parents: 27750 diff changeset	1274 int fuzzy;
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations Bram Moolenaar <Bram@vim.org> parents: 27750 diff changeset	1275 int match;
29212 35a30cb18005 patch 8.2.5125: MS-Windows: warnings from MinGW compiler Bram Moolenaar <Bram@vim.org> parents: 29175 diff changeset	1276 int score = 0;
27916 6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1277 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	1278
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations Bram Moolenaar <Bram@vim.org> parents: 27750 diff changeset	1279 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	1280
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1281 validate_maphash();
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1282
27908 099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations Bram Moolenaar <Bram@vim.org> parents: 27750 diff changeset	1283 *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	1284 *matches = NULL;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1285
27916 6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1286 if (!fuzzy)
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1287 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	1288 else
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1289 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	1290
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1291 // 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	1292 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	1293 {
27916 6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1294 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	1295 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	1296 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	1297 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	1298 #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	1299 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	1300 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	1301 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	1302 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	1303 #endif
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1304 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	1305 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	1306 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	1307 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	1308 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	1309 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	1310 else
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1311 continue;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1312
27916 6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1313 if (!fuzzy)
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1314 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	1315 else
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1316 {
27916 6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1317 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	1318 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	1319 }
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 (!match)
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1322 continue;
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 (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	1325 break;
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1326
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1327 if (fuzzy)
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1328 {
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1329 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	1330 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	1331 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	1332 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	1333 }
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1334 else
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1335 ((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	1336 ++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	1337 }
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1338
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1339 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	1340 {
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1341 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	1342 {
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1343 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	1344 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	1345 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	1346 }
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1347 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	1348 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	1349 else
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1350 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	1351 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	1352 {
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1353 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	1354 continue;
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1355
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1356 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	1357 if (p == NULL)
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1358 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1359
27908 099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations Bram Moolenaar <Bram@vim.org> parents: 27750 diff changeset	1360 if (!fuzzy)
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations Bram Moolenaar <Bram@vim.org> parents: 27750 diff changeset	1361 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	1362 else
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1363 {
27908 099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations Bram Moolenaar <Bram@vim.org> parents: 27750 diff changeset	1364 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	1365 match = (score != 0);
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations Bram Moolenaar <Bram@vim.org> parents: 27750 diff changeset	1366 }
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations Bram Moolenaar <Bram@vim.org> parents: 27750 diff changeset	1367
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations Bram Moolenaar <Bram@vim.org> parents: 27750 diff changeset	1368 if (!match)
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1369 {
27916 6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1370 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	1371 continue;
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1372 }
27908 099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations Bram Moolenaar <Bram@vim.org> parents: 27750 diff changeset	1373
27916 6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1374 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	1375 {
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1376 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	1377 break;
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1378 }
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1379
27908 099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations Bram Moolenaar <Bram@vim.org> parents: 27750 diff changeset	1380 if (fuzzy)
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations Bram Moolenaar <Bram@vim.org> parents: 27750 diff changeset	1381 {
27916 6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1382 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	1383 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	1384 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	1385 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	1386 }
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations Bram Moolenaar <Bram@vim.org> parents: 27750 diff changeset	1387 else
27916 6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1388 ((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	1389
27916 6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1390 ++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	1391 } // for (mp)
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1392 } // for (hash)
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1393
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1394 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	1395 return FAIL;
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations Bram Moolenaar <Bram@vim.org> parents: 27750 diff changeset	1396
27916 6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1397 if (!fuzzy)
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 *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	1400 *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	1401 }
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1402 else
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1403 {
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1404 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	1405 FALSE) == FAIL)
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1406 return FAIL;
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1407 *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	1408 }
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1409
6efa2f193c94 patch 8.2.4483: command completion makes two rounds to collect matches Bram Moolenaar <Bram@vim.org> parents: 27908 diff changeset	1410 count = *numMatches;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1411 if (count > 1)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1412 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1413 char_u **ptr1;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1414 char_u **ptr2;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1415 char_u **ptr3;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1416
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1417 // 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	1418 // 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	1419 if (!fuzzy)
099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations Bram Moolenaar <Bram@vim.org> parents: 27750 diff changeset	1420 sort_strings(*matches, count);
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1421
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1422 // 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	1423 ptr1 = *matches;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1424 ptr2 = ptr1 + 1;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1425 ptr3 = ptr1 + count;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1426
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1427 while (ptr2 < ptr3)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1428 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1429 if (STRCMP(ptr1, ptr2))
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1430 ++ptr1 = ptr2++;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1431 else
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 vim_free(*ptr2++);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1434 count--;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1435 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1436 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1437 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1438
27908 099c2e612827 patch 8.2.4479: no fuzzy completieon for maps and abbreviations Bram Moolenaar <Bram@vim.org> parents: 27750 diff changeset	1439 *numMatches = count;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1440 return (count == 0 ? FAIL : OK);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1441 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1442
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1443 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1444 * Check for an abbreviation.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1445 * Cursor is at ptr[col].
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1446 * 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	1447 * 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	1448 * "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	1449 * 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	1450 *
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1451 * 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	1452 * 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	1453 * 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	1454 * "#include".
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 * 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	1457 * 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	1458 *
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1459 * 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	1460 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1461 int
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1462 check_abbr(
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1463 int c,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1464 char_u *ptr,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1465 int col,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1466 int mincol)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1467 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1468 int len;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1469 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	1470 int j;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1471 char_u *s;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1472 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	1473 mapblock_T *mp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1474 mapblock_T *mp2;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1475 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	1476 int is_id = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1477 int vim_abbr;
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 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	1480 return FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1481
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1482 // 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	1483 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	1484 return FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1485
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1486 // 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	1487 // 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	1488 // 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	1489 // before it except white space.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1490 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	1491 return FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1492
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1493 if (has_mbyte)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1494 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1495 char_u *p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1496
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1497 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	1498 if (!vim_iswordp(p))
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1499 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	1500 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1501 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1502 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	1503 if (p > ptr)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1504 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	1505 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1506 clen = 1;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1507 while (p > ptr + mincol)
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_prevptr(ptr, p);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1510 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	1511 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1512 p += (*mb_ptr2len)(p);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1513 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1514 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1515 ++clen;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1516 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1517 scol = (int)(p - ptr);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1518 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1519 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1520 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1521 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	1522 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	1523 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1524 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1525 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	1526 if (col > 1)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1527 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	1528 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1529 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	1530 && (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	1531 ;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1532 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1533
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1534 if (scol < mincol)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1535 scol = mincol;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1536 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	1537 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1538 ptr += scol;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1539 len = col - scol;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1540 mp = curbuf->b_first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1541 mp2 = first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1542 if (mp == 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 mp = mp2;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1545 mp2 = NULL;
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 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	1548 ? (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	1549 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1550 int qlen = mp->m_keylen;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1551 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	1552 int match;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1553
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1554 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	1555 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1556 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	1557
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1558 // 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	1559 if (qe != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1560 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1561 q = qe;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1562 vim_unescape_csi(q);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1563 qlen = (int)STRLEN(q);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1564 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1565 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1566
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1567 // 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	1568 match = (mp->m_mode & State)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1569 && qlen == len
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1570 && !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	1571 if (q != mp->m_keys)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1572 vim_free(q);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1573 if (match)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1574 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1575 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1576 if (mp != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1577 {
27221 165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation Bram Moolenaar <Bram@vim.org> parents: 27165 diff changeset	1578 int noremap;
165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation Bram Moolenaar <Bram@vim.org> parents: 27165 diff changeset	1579 int silent;
165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation Bram Moolenaar <Bram@vim.org> parents: 27165 diff changeset	1580 #ifdef FEAT_EVAL
165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation Bram Moolenaar <Bram@vim.org> parents: 27165 diff changeset	1581 int expr;
165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation Bram Moolenaar <Bram@vim.org> parents: 27165 diff changeset	1582 #endif
165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation Bram Moolenaar <Bram@vim.org> parents: 27165 diff changeset	1583
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1584 // Found a match:
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1585 // 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	1586 // 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	1587 //
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1588 // 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	1589 // 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	1590 // 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	1591 // 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	1592 //
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1593 // 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	1594 // 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	1595 j = 0;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1596 if (c != Ctrl_RSB)
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 // special key code, split up
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1599 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	1600 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1601 tb[j++] = K_SPECIAL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1602 tb[j++] = K_SECOND(c);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1603 tb[j++] = K_THIRD(c);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1604 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1605 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1606 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1607 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	1608 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	1609 if (has_mbyte)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1610 {
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	1611 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	1612 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	1613
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1614 // 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	1615 if (c >= ABBR_OFF)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1616 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	1617 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	1618 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	1619 // 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	1620 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	1621 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	1622 {
24574 3a3d5ee00574 patch 8.2.2826: compiler warnings for int to size_t conversion Bram Moolenaar <Bram@vim.org> parents: 24559 diff changeset	1623 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	1624 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	1625 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	1626 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	1627 }
17576 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 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1630 tb[j++] = c;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1631 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1632 tb[j] = NUL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1633 // insert the last typed char
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1634 (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	1635 }
27221 165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation Bram Moolenaar <Bram@vim.org> parents: 27165 diff changeset	1636
165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation Bram Moolenaar <Bram@vim.org> parents: 27165 diff changeset	1637 // 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	1638 noremap = mp->m_noremap;
165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation Bram Moolenaar <Bram@vim.org> parents: 27165 diff changeset	1639 silent = mp->m_silent;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1640 #ifdef FEAT_EVAL
27221 165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation Bram Moolenaar <Bram@vim.org> parents: 27165 diff changeset	1641 expr = mp->m_expr;
165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation Bram Moolenaar <Bram@vim.org> parents: 27165 diff changeset	1642
165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation Bram Moolenaar <Bram@vim.org> parents: 27165 diff changeset	1643 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	1644 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	1645 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1646 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1647 s = mp->m_str;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1648 if (s != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1649 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1650 // 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	1651 (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	1652 // no abbrev. for these chars
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1653 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	1654 #ifdef FEAT_EVAL
27221 165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation Bram Moolenaar <Bram@vim.org> parents: 27165 diff changeset	1655 if (expr)
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1656 vim_free(s);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1657 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1658 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1659
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1660 tb[0] = Ctrl_H;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1661 tb[1] = NUL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1662 if (has_mbyte)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1663 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	1664 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	1665 (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	1666 return TRUE;
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 return FALSE;
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
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1672 #ifdef FEAT_EVAL
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1673 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1674 * 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	1675 * special characters.
27221 165a799b4129 patch 8.2.4139: using freed memory in expression abbreviation Bram Moolenaar <Bram@vim.org> parents: 27165 diff changeset	1676 * 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	1677 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1678 char_u *
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1679 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	1680 mapblock_T *mp,
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1681 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	1682 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1683 char_u *res;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1684 char_u *p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1685 char_u *expr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1686 pos_T save_cursor;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1687 int save_msg_col;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1688 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	1689 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	1690 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	1691
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1692 // 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	1693 // 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	1694 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	1695 if (expr == NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1696 return NULL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1697 vim_unescape_csi(expr);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1698
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1699 // 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	1700 // 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	1701 ++textlock;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1702 ++ex_normal_lock;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1703 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	1704 save_cursor = curwin->w_cursor;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1705 save_msg_col = msg_col;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1706 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	1707 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	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 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	1710 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	1711 }
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
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	1713 // 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	1714 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	1715
29014 45c182c4f7e9 patch 8.2.5029: "textlock" is always zero Bram Moolenaar <Bram@vim.org> parents: 28817 diff changeset	1716 --textlock;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1717 --ex_normal_lock;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1718 curwin->w_cursor = save_cursor;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1719 msg_col = save_msg_col;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1720 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	1721 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	1722 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	1723
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1724 vim_free(expr);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1725
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1726 if (p == NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1727 return NULL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1728 // 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	1729 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	1730 vim_free(p);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1731
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1732 return res;
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 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1735
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1736 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1737 * 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	1738 * 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	1739 * 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	1740 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1741 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	1742 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	1743 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1744 char_u *res;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1745 char_u s, d;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1746
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1747 // 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	1748 // illegal utf-8 byte:
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1749 // 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	1750 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	1751 if (res != NULL)
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 d = res;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1754 for (s = p; *s != NUL; )
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1755 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1756 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	1757 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1758 // Copy special key unmodified.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1759 d++ = s++;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1760 d++ = s++;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1761 d++ = s++;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1762 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1763 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1764 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1765 // 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	1766 // 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	1767 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	1768 s += MB_CPTR2LEN(s);
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 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1771 *d = NUL;
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 return res;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1774 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1775
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 * 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	1778 * 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	1779 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1780 void
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1781 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	1782 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1783 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	1784
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1785 while (*s != NUL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1786 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1787 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	1788 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1789 *d++ = K_SPECIAL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1790 s += 3;
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 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	1793 && 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	1794 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1795 *d++ = CSI;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1796 s += 3;
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 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1799 d++ = s++;
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 *d = NUL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1802 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1803
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 * 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	1806 * 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	1807 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1808 int
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1809 makemap(
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1810 FILE *fd,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1811 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	1812 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1813 mapblock_T *mp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1814 char_u c1, c2, c3;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1815 char_u *p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1816 char *cmd;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1817 int abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1818 int hash;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1819 int did_cpo = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1820 int i;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1821
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1822 validate_maphash();
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1823
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1824 // 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	1825 // 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	1826 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	1827 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	1828 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1829 if (abbr)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1830 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1831 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	1832 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1833 if (buf != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1834 mp = buf->b_first_abbr;
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 mp = first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1837 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1838 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1839 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1840 if (buf != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1841 mp = buf->b_maphash[hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1842 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1843 mp = maphash[hash];
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
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1846 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	1847 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1848 // skip script-local mappings
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1849 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	1850 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1851
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1852 // 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	1853 // 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	1854 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	1855 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	1856 && p[2] == (int)KE_SNR)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1857 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1858 if (*p != NUL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1859 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1860
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1861 // 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	1862 // 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	1863 // 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	1864 c1 = NUL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1865 c2 = NUL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1866 c3 = NUL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1867 if (abbr)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1868 cmd = "abbr";
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1869 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1870 cmd = "map";
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1871 switch (mp->m_mode)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1872 {
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 \| 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	1874 \| MODE_OP_PENDING:
17576 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_NORMAL:
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1877 c1 = 'n';
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_VISUAL:
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1880 c1 = 'x';
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_SELECT:
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1883 c1 = 's';
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_OP_PENDING:
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1886 c1 = 'o';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1887 break;
28773 d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named Bram Moolenaar <Bram@vim.org> parents: 28686 diff changeset	1888 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	1889 c1 = 'n';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1890 c2 = 'x';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1891 break;
28773 d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named Bram Moolenaar <Bram@vim.org> parents: 28686 diff changeset	1892 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	1893 c1 = 'n';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1894 c2 = 's';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1895 break;
28773 d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named Bram Moolenaar <Bram@vim.org> parents: 28686 diff changeset	1896 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	1897 c1 = 'n';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1898 c2 = 'o';
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_SELECT:
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1901 c1 = 'v';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1902 break;
28773 d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named Bram Moolenaar <Bram@vim.org> parents: 28686 diff changeset	1903 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	1904 c1 = 'x';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1905 c2 = 'o';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1906 break;
28773 d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named Bram Moolenaar <Bram@vim.org> parents: 28686 diff changeset	1907 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	1908 c1 = 's';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1909 c2 = 'o';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1910 break;
28773 d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named Bram Moolenaar <Bram@vim.org> parents: 28686 diff changeset	1911 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	1912 c1 = 'n';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1913 c2 = 'v';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1914 break;
28773 d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named Bram Moolenaar <Bram@vim.org> parents: 28686 diff changeset	1915 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	1916 c1 = 'n';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1917 c2 = 'x';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1918 c3 = 'o';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1919 break;
28773 d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named Bram Moolenaar <Bram@vim.org> parents: 28686 diff changeset	1920 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	1921 c1 = 'n';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1922 c2 = 's';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1923 c3 = 'o';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1924 break;
28773 d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named Bram Moolenaar <Bram@vim.org> parents: 28686 diff changeset	1925 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	1926 c1 = 'v';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1927 c2 = 'o';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1928 break;
28773 d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named Bram Moolenaar <Bram@vim.org> parents: 28686 diff changeset	1929 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	1930 if (!abbr)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1931 cmd = "map!";
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_CMDLINE:
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1934 c1 = 'c';
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_INSERT:
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1937 c1 = 'i';
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_LANGMAP:
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1940 c1 = 'l';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1941 break;
28773 d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named Bram Moolenaar <Bram@vim.org> parents: 28686 diff changeset	1942 case MODE_TERMINAL:
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1943 c1 = 't';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1944 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1945 default:
26861 df2de1e63de0 patch 8.2.3959: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 26224 diff changeset	1946 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	1947 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1948 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1949 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	1950 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1951 // 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	1952 // 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	1953 if (!did_cpo)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1954 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1955 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	1956 did_cpo = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1957 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1958 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	1959 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	1960 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	1961 did_cpo = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1962 if (did_cpo)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1963 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1964 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	1965 \|\| put_eol(fd) < 0
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1966 \|\| 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	1967 \|\| put_eol(fd) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1968 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1969 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1970 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1971 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	1972 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1973 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	1974 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1975 if (fputs(cmd, fd) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1976 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1977 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	1978 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1979 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	1980 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1981 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	1982 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1983 #ifdef FEAT_EVAL
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1984 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	1985 && fputs("<script>", fd) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1986 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1987 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	1988 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1989 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1990
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1991 if ( putc(' ', fd) < 0
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1992 \|\| 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	1993 \|\| putc(' ', fd) < 0
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1994 \|\| 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	1995 \|\| put_eol(fd) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1996 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1997 c1 = c2;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1998 c2 = c3;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1999 c3 = NUL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2000 } while (c1 != NUL);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2001 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2002 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2003
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2004 if (did_cpo)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2005 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	2006 \|\| put_eol(fd) < 0
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2007 \|\| 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	2008 \|\| put_eol(fd) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2009 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2010 return OK;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2011 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2012
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 * write escape string to file
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2015 * "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	2016 *
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2017 * 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	2018 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2019 int
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2020 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	2021 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2022 char_u *str = strstart;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2023 int c;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2024 int modifiers;
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 // :map xx <Nop>
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2027 if (*str == NUL && what == 1)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2028 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2029 if (fprintf(fd, "<Nop>") < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2030 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2031 return OK;
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
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2034 for ( ; *str != NUL; ++str)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2035 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2036 char_u *p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2037
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2038 // 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	2039 // K_SPECIAL and CSI bytes
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2040 p = mb_unescape(&str);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2041 if (p != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2042 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2043 while (*p != NUL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2044 if (fputc(*p++, fd) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2045 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2046 --str;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2047 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2048 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2049
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2050 c = *str;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2051 // 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	2052 // when they are read back.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2053 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	2054 {
21996 808edde1e97d patch 8.2.1547: various comment problems Bram Moolenaar <Bram@vim.org> parents: 20996 diff changeset	2055 modifiers = 0;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2056 if (str[1] == KS_MODIFIER)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2057 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2058 modifiers = str[2];
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2059 str += 3;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2060 c = *str;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2061 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2062 if (c == K_SPECIAL)
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 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	2065 str += 2;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2066 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2067 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	2068 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2069 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	2070 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2071 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2072 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2073 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2074
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2075 // 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	2076 // 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	2077 if (c == NL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2078 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2079 if (what == 2)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2080 {
27490 fb4c30606b4a patch 8.2.4273: the EBCDIC support is outdated Bram Moolenaar <Bram@vim.org> parents: 27243 diff changeset	2081 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	2082 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2083 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2084 else
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 if (fprintf(fd, "<NL>") < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2087 return FAIL;
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 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2090 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2091
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2092 // 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	2093 // 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	2094 // 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	2095 // 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	2096 // 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	2097 // ":map" rhs.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2098 // 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	2099 // 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	2100 // 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	2101 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	2102 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2103 if (putc('\\', fd) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2104 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2105 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2106 else if (c < ' ' \|\| c > '~' \|\| c == '\|'
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2107 \|\| (what == 0 && c == ' ')
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2108 \|\| (what == 1 && str == strstart && c == ' ')
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2109 \|\| (what != 2 && c == '<'))
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(Ctrl_V, 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 if (putc(c, fd) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2115 return FAIL;
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 return OK;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2118 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2119
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 * 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	2122 * Used after ":set term=xxx".
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 void
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2125 check_map_keycodes(void)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2126 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2127 mapblock_T *mp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2128 char_u *p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2129 int i;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2130 char_u buf[3];
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2131 int abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2132 int hash;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2133 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	2134 ESTACK_CHECK_DECLARATION
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2135
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2136 validate_maphash();
18991 847cc7932c42 patch 8.2.0056: execution stack is incomplete and inefficient Bram Moolenaar <Bram@vim.org> parents: 18498 diff changeset	2137 // avoids giving error messages
847cc7932c42 patch 8.2.0056: execution stack is incomplete and inefficient Bram Moolenaar <Bram@vim.org> parents: 18498 diff changeset	2138 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	2139 ESTACK_CHECK_SETUP
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2140
18498 9e6d5a4abb1c patch 8.1.2243: typos in comments Bram Moolenaar <Bram@vim.org> parents: 18329 diff changeset	2141 // 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	2142 // mappings/abbreviations with bp == NULL
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2143 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	2144 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2145 // 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	2146 // 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	2147 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	2148 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	2149 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2150 if (abbr)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2151 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2152 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	2153 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2154 if (bp != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2155 mp = bp->b_first_abbr;
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 mp = first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2158 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2159 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2160 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2161 if (bp != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2162 mp = bp->b_maphash[hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2163 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2164 mp = maphash[hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2165 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2166 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	2167 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2168 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	2169 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2170 if (i == 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2171 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	2172 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2173 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	2174 while (*p)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2175 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2176 if (*p == K_SPECIAL)
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 ++p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2179 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	2180 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2181 buf[0] = p[0];
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2182 buf[1] = p[1];
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2183 buf[2] = NUL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2184 (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	2185 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2186 ++p;
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 ++p;
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 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2191 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2192 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2193 if (bp == NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2194 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2195 }
19075 af1eca322b9e patch 8.2.0098: exe stack length can be wrong without being detected Bram Moolenaar <Bram@vim.org> parents: 18991 diff changeset	2196 ESTACK_CHECK_NOW
18991 847cc7932c42 patch 8.2.0056: execution stack is incomplete and inefficient Bram Moolenaar <Bram@vim.org> parents: 18498 diff changeset	2197 estack_pop();
17576 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
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2200 #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	2201 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2202 * 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	2203 * 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	2204 * NULL when no mapping found.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2205 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2206 char_u *
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2207 check_map(
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2208 char_u *keys,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2209 int mode,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2210 int exact, // require exact match
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2211 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	2212 int abbr, // do abbreviations
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2213 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	2214 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	2215 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2216 int hash;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2217 int len, minlen;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2218 mapblock_T *mp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2219 char_u *s;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2220 int local;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2221
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2222 validate_maphash();
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2223
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2224 len = (int)STRLEN(keys);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2225 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	2226 // loop over all hash lists
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2227 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	2228 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2229 if (abbr)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2230 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2231 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	2232 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2233 if (local)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2234 mp = curbuf->b_first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2235 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2236 mp = first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2237 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2238 else if (local)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2239 mp = curbuf->b_maphash[hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2240 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2241 mp = maphash[hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2242 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	2243 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2244 // 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	2245 // ones
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2246 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	2247 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2248 if (len > mp->m_keylen)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2249 minlen = mp->m_keylen;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2250 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2251 minlen = len;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2252 s = mp->m_keys;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2253 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	2254 && s[2] != NUL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2255 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2256 s += 3;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2257 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	2258 minlen = mp->m_keylen - 3;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2259 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2260 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	2261 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2262 if (mp_ptr != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2263 *mp_ptr = mp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2264 if (local_ptr != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2265 *local_ptr = local;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2266 return mp->m_str;
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 }
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
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2272 return NULL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2273 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2274
28592 d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping Bram Moolenaar <Bram@vim.org> parents: 28590 diff changeset	2275 /*
29318 fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2276 * "hasmapto()" function
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2277 */
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2278 void
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2279 f_hasmapto(typval_T argvars, typval_T rettv)
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2280 {
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2281 char_u *name;
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2282 char_u *mode;
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2283 char_u buf[NUMBUFLEN];
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2284 int abbr = FALSE;
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2285
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2286 if (in_vim9script()
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2287 && (check_for_string_arg(argvars, 0) == FAIL
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2288 \|\| check_for_opt_string_arg(argvars, 1) == FAIL
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2289 \|\| (argvars[1].v_type != VAR_UNKNOWN
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2290 && check_for_opt_bool_arg(argvars, 2) == FAIL)))
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2291 return;
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2292
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2293 name = tv_get_string(&argvars[0]);
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2294 if (argvars[1].v_type == VAR_UNKNOWN)
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2295 mode = (char_u *)"nvo";
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2296 else
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2297 {
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2298 mode = tv_get_string_buf(&argvars[1], buf);
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2299 if (argvars[2].v_type != VAR_UNKNOWN)
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2300 abbr = (int)tv_get_bool(&argvars[2]);
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2301 }
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2302
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2303 if (map_to_exists(name, mode, abbr))
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2304 rettv->vval.v_number = TRUE;
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2305 else
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2306 rettv->vval.v_number = FALSE;
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2307 }
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2308
fcf524e1e97e patch 9.0.0002: map functionality outside of map.c Bram Moolenaar <Bram@vim.org> parents: 29212 diff changeset	2309 /*
28592 d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping Bram Moolenaar <Bram@vim.org> parents: 28590 diff changeset	2310 * 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	2311 */
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping Bram Moolenaar <Bram@vim.org> parents: 28590 diff changeset	2312 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	2313 mapblock2dict(
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping Bram Moolenaar <Bram@vim.org> parents: 28590 diff changeset	2314 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	2315 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	2316 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	2317 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	2318 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	2319 {
30226 b6b803ed4a53 patch 9.0.0449: there is no easy way to translate a key code into a string Bram Moolenaar <Bram@vim.org> parents: 30007 diff changeset	2320 char_u *lhs = str2special_save(mp->m_keys, TRUE, FALSE);
28592 d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping Bram Moolenaar <Bram@vim.org> parents: 28590 diff changeset	2321 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	2322
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping Bram Moolenaar <Bram@vim.org> parents: 28590 diff changeset	2323 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	2324 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	2325 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	2326 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	2327 // 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	2328 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	2329 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	2330 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	2331 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	2332 ? 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	2333 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	2334 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	2335 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	2336 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	2337 (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	2338 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	2339 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	2340 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	2341 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	2342 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	2343 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	2344
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping Bram Moolenaar <Bram@vim.org> parents: 28590 diff changeset	2345 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	2346 }
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping Bram Moolenaar <Bram@vim.org> parents: 28590 diff changeset	2347
25431 634aed775408 patch 8.2.3252: duplicated code for adding buffer lines Bram Moolenaar <Bram@vim.org> parents: 25306 diff changeset	2348 static void
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2349 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	2350 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2351 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	2352 char_u *keys_simplified;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2353 char_u *which;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2354 char_u buf[NUMBUFLEN];
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2355 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	2356 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	2357 int did_simplify = FALSE;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2358 char_u *rhs;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2359 int mode;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2360 int abbr = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2361 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	2362 mapblock_T *mp = NULL;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2363 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	2364 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	2365
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2366 // return empty string for failure
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2367 rettv->v_type = VAR_STRING;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2368 rettv->vval.v_string = NULL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2369
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2370 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	2371 if (*keys == NUL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2372 return;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2373
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2374 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	2375 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2376 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	2377 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	2378 {
22055 88bedbb4ba75 patch 8.2.1577: Vim9: hasmapto()/mapcheck()/maparg() do nottake "true" arg Bram Moolenaar <Bram@vim.org> parents: 21996 diff changeset	2379 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	2380 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	2381 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	2382 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2383 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2384 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2385 which = (char_u *)"";
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2386 if (which == NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2387 return;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2388
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2389 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	2390
20522 729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset() Bram Moolenaar <Bram@vim.org> parents: 20516 diff changeset	2391 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	2392 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	2393 &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	2394 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	2395 {
729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset() Bram Moolenaar <Bram@vim.org> parents: 20516 diff changeset	2396 // 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	2397 // 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	2398 (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	2399 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	2400 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	2401 &buffer_local);
729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset() Bram Moolenaar <Bram@vim.org> parents: 20516 diff changeset	2402 }
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2403
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2404 if (!get_dict)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2405 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2406 // Return a string.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2407 if (rhs != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2408 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2409 if (*rhs == NUL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2410 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	2411 else
30226 b6b803ed4a53 patch 9.0.0449: there is no easy way to translate a key code into a string Bram Moolenaar <Bram@vim.org> parents: 30007 diff changeset	2412 rettv->vval.v_string = str2special_save(rhs, FALSE, FALSE);
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2413 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2414
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2415 }
29175 755ab148288b patch 8.2.5107: some callers of rettv_list_alloc() check for not OK Bram Moolenaar <Bram@vim.org> parents: 29173 diff changeset	2416 else if (rettv_dict_alloc(rettv) == OK && 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	2417 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	2418 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	2419 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	2420
729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset() Bram Moolenaar <Bram@vim.org> parents: 20516 diff changeset	2421 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	2422 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	2423 }
20506 aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2424
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2425 /*
28602 398c5b3211f9 patch 8.2.4825: can only get a list of mappings Bram Moolenaar <Bram@vim.org> parents: 28600 diff changeset	2426 * "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	2427 */
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping Bram Moolenaar <Bram@vim.org> parents: 28590 diff changeset	2428 void
28602 398c5b3211f9 patch 8.2.4825: can only get a list of mappings Bram Moolenaar <Bram@vim.org> parents: 28600 diff changeset	2429 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	2430 {
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping Bram Moolenaar <Bram@vim.org> parents: 28590 diff changeset	2431 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	2432 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	2433 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	2434 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	2435 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	2436 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	2437 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	2438 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	2439 int abbr = FALSE;
398c5b3211f9 patch 8.2.4825: can only get a list of mappings Bram Moolenaar <Bram@vim.org> parents: 28600 diff changeset	2440
398c5b3211f9 patch 8.2.4825: can only get a list of mappings Bram Moolenaar <Bram@vim.org> parents: 28600 diff changeset	2441 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	2442 return;
398c5b3211f9 patch 8.2.4825: can only get a list of mappings Bram Moolenaar <Bram@vim.org> parents: 28600 diff changeset	2443 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	2444 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	2445
29175 755ab148288b patch 8.2.5107: some callers of rettv_list_alloc() check for not OK Bram Moolenaar <Bram@vim.org> parents: 29173 diff changeset	2446 if (rettv_list_alloc(rettv) == FAIL)
28592 d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping Bram Moolenaar <Bram@vim.org> parents: 28590 diff changeset	2447 return;
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping Bram Moolenaar <Bram@vim.org> parents: 28590 diff changeset	2448
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping Bram Moolenaar <Bram@vim.org> parents: 28590 diff changeset	2449 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	2450
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping Bram Moolenaar <Bram@vim.org> parents: 28590 diff changeset	2451 // 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	2452 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	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 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	2455 {
28602 398c5b3211f9 patch 8.2.4825: can only get a list of mappings Bram Moolenaar <Bram@vim.org> parents: 28600 diff changeset	2456 if (abbr)
398c5b3211f9 patch 8.2.4825: can only get a list of mappings Bram Moolenaar <Bram@vim.org> parents: 28600 diff changeset	2457 {
398c5b3211f9 patch 8.2.4825: can only get a list of mappings Bram Moolenaar <Bram@vim.org> parents: 28600 diff changeset	2458 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	2459 break;
398c5b3211f9 patch 8.2.4825: can only get a list of mappings Bram Moolenaar <Bram@vim.org> parents: 28600 diff changeset	2460 if (buffer_local)
398c5b3211f9 patch 8.2.4825: can only get a list of mappings Bram Moolenaar <Bram@vim.org> parents: 28600 diff changeset	2461 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	2462 else
398c5b3211f9 patch 8.2.4825: can only get a list of mappings Bram Moolenaar <Bram@vim.org> parents: 28600 diff changeset	2463 mp = first_abbr;
398c5b3211f9 patch 8.2.4825: can only get a list of mappings Bram Moolenaar <Bram@vim.org> parents: 28600 diff changeset	2464 }
398c5b3211f9 patch 8.2.4825: can only get a list of mappings Bram Moolenaar <Bram@vim.org> parents: 28600 diff changeset	2465 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	2466 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	2467 else
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping Bram Moolenaar <Bram@vim.org> parents: 28590 diff changeset	2468 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	2469 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	2470 {
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping Bram Moolenaar <Bram@vim.org> parents: 28590 diff changeset	2471 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	2472 continue;
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping Bram Moolenaar <Bram@vim.org> parents: 28590 diff changeset	2473 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	2474 return;
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping Bram Moolenaar <Bram@vim.org> parents: 28590 diff changeset	2475 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	2476 return;
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping Bram Moolenaar <Bram@vim.org> parents: 28590 diff changeset	2477
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping Bram Moolenaar <Bram@vim.org> parents: 28590 diff changeset	2478 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	2479 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	2480
30226 b6b803ed4a53 patch 9.0.0449: there is no easy way to translate a key code into a string Bram Moolenaar <Bram@vim.org> parents: 30007 diff changeset	2481 lhs = str2special_save(mp->m_keys, TRUE, FALSE);
28592 d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping Bram Moolenaar <Bram@vim.org> parents: 28590 diff changeset	2482 (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	2483 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	2484
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping Bram Moolenaar <Bram@vim.org> parents: 28590 diff changeset	2485 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	2486 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	2487 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	2488 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	2489 }
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping Bram Moolenaar <Bram@vim.org> parents: 28590 diff changeset	2490 }
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping Bram Moolenaar <Bram@vim.org> parents: 28590 diff changeset	2491 }
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping Bram Moolenaar <Bram@vim.org> parents: 28590 diff changeset	2492 }
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping Bram Moolenaar <Bram@vim.org> parents: 28590 diff changeset	2493
d3c966c0cdf7 patch 8.2.4820: not simple programmatic way to find a specific mapping Bram Moolenaar <Bram@vim.org> parents: 28590 diff changeset	2494 /*
25431 634aed775408 patch 8.2.3252: duplicated code for adding buffer lines Bram Moolenaar <Bram@vim.org> parents: 25306 diff changeset	2495 * "maparg()" function
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines Bram Moolenaar <Bram@vim.org> parents: 25306 diff changeset	2496 */
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines Bram Moolenaar <Bram@vim.org> parents: 25306 diff changeset	2497 void
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines Bram Moolenaar <Bram@vim.org> parents: 25306 diff changeset	2498 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	2499 {
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines Bram Moolenaar <Bram@vim.org> parents: 25306 diff changeset	2500 if (in_vim9script()
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines Bram Moolenaar <Bram@vim.org> parents: 25306 diff changeset	2501 && (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	2502 \|\| 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	2503 \|\| (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	2504 && (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	2505 \|\| (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	2506 && 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	2507 return;
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines Bram Moolenaar <Bram@vim.org> parents: 25306 diff changeset	2508
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines Bram Moolenaar <Bram@vim.org> parents: 25306 diff changeset	2509 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	2510 }
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines Bram Moolenaar <Bram@vim.org> parents: 25306 diff changeset	2511
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines Bram Moolenaar <Bram@vim.org> parents: 25306 diff changeset	2512 /*
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines Bram Moolenaar <Bram@vim.org> parents: 25306 diff changeset	2513 * "mapcheck()" function
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines Bram Moolenaar <Bram@vim.org> parents: 25306 diff changeset	2514 */
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines Bram Moolenaar <Bram@vim.org> parents: 25306 diff changeset	2515 void
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines Bram Moolenaar <Bram@vim.org> parents: 25306 diff changeset	2516 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	2517 {
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines Bram Moolenaar <Bram@vim.org> parents: 25306 diff changeset	2518 if (in_vim9script()
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines Bram Moolenaar <Bram@vim.org> parents: 25306 diff changeset	2519 && (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	2520 \|\| 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	2521 \|\| (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	2522 && 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	2523 return;
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines Bram Moolenaar <Bram@vim.org> parents: 25306 diff changeset	2524
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines Bram Moolenaar <Bram@vim.org> parents: 25306 diff changeset	2525 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	2526 }
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines Bram Moolenaar <Bram@vim.org> parents: 25306 diff changeset	2527
634aed775408 patch 8.2.3252: duplicated code for adding buffer lines Bram Moolenaar <Bram@vim.org> parents: 25306 diff changeset	2528 /*
28674 38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2529 * 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	2530 * 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	2531 * 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	2532 */
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2533 static int
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2534 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	2535 {
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2536 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	2537 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	2538 int tmode;
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2539 int modec;
28773 d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named Bram Moolenaar <Bram@vim.org> parents: 28686 diff changeset	2540 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	2541 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	2542 \| MODE_OP_PENDING;
d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named Bram Moolenaar <Bram@vim.org> parents: 28686 diff changeset	2543 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	2544
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2545 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	2546 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	2547 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	2548 {
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2549 switch (modec)
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2550 {
28773 d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named Bram Moolenaar <Bram@vim.org> parents: 28686 diff changeset	2551 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	2552 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	2553 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	2554 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	2555 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	2556 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	2557 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	2558 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	2559 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	2560 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	2561 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	2562 default:
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2563 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	2564 }
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2565 mode \|= tmode;
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2566 }
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2567 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	2568 \|\| (!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	2569 && (
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2570 // 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	2571 // 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	2572 !(((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	2573 \|\| ((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	2574 return 0;
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2575
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2576 return mode;
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2577 }
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2578
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2579 /*
20506 aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2580 * "mapset()" function
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2581 */
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2582 void
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2583 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	2584 {
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2585 char_u *which;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2586 int mode;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2587 char_u buf[NUMBUFLEN];
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2588 int is_abbr;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2589 dict_T *d;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2590 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	2591 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	2592 char_u *lhsrawalt;
20506 aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2593 char_u *rhs;
20516 d9e3fdf26cb9 patch 8.2.0812: mapset() does not properly handle <> notation Bram Moolenaar <Bram@vim.org> parents: 20510 diff changeset	2594 char_u *orig_rhs;
d9e3fdf26cb9 patch 8.2.0812: mapset() does not properly handle <> notation Bram Moolenaar <Bram@vim.org> parents: 20510 diff changeset	2595 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	2596 int noremap;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2597 int expr;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2598 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	2599 int buffer;
20506 aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2600 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	2601 int scriptversion;
20506 aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2602 linenr_T lnum;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2603 mapblock_T **map_table = maphash;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2604 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	2605 int nowait;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2606 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	2607 int dict_only;
20506 aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2608
28674 38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2609 // 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	2610 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	2611 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	2612 && (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	2613 \|\| (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	2614 \|\| (!dict_only
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2615 && (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	2616 \|\| 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	2617 \|\| 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	2618 return;
4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time Bram Moolenaar <Bram@vim.org> parents: 25064 diff changeset	2619
28674 38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2620 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	2621 {
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2622 d = argvars[0].vval.v_dict;
29442 827d9f2b7a71 patch 9.0.0063: too many type casts for dict_get functions Bram Moolenaar <Bram@vim.org> parents: 29318 diff changeset	2623 which = dict_get_string(d, "mode", FALSE);
827d9f2b7a71 patch 9.0.0063: too many type casts for dict_get functions Bram Moolenaar <Bram@vim.org> parents: 29318 diff changeset	2624 is_abbr = dict_get_bool(d, "abbr", -1);
28674 38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2625 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	2626 {
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2627 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	2628 return;
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2629 }
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2630 }
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2631 else
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2632 {
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2633 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	2634 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	2635 return;
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2636 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	2637
29994 86eb4aba16c3 patch 9.0.0335: checks for Dictionary argument often give a vague error Bram Moolenaar <Bram@vim.org> parents: 29572 diff changeset	2638 if (check_for_dict_arg(argvars, 2) == FAIL)
28674 38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2639 return;
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2640 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	2641 }
38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2642 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	2643 if (mode == 0)
20506 aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2644 {
28674 38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2645 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	2646 return;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2647 }
28674 38f7a132bba3 patch 8.2.4861: it is not easy to restore saved mappings Bram Moolenaar <Bram@vim.org> parents: 28614 diff changeset	2648
20506 aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2649
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2650 // Get the values in the same order as above in get_maparg().
29442 827d9f2b7a71 patch 9.0.0063: too many type casts for dict_get functions Bram Moolenaar <Bram@vim.org> parents: 29318 diff changeset	2651 lhs = dict_get_string(d, "lhs", FALSE);
827d9f2b7a71 patch 9.0.0063: too many type casts for dict_get functions Bram Moolenaar <Bram@vim.org> parents: 29318 diff changeset	2652 lhsraw = dict_get_string(d, "lhsraw", FALSE);
827d9f2b7a71 patch 9.0.0063: too many type casts for dict_get functions Bram Moolenaar <Bram@vim.org> parents: 29318 diff changeset	2653 lhsrawalt = dict_get_string(d, "lhsrawalt", FALSE);
827d9f2b7a71 patch 9.0.0063: too many type casts for dict_get functions Bram Moolenaar <Bram@vim.org> parents: 29318 diff changeset	2654 rhs = dict_get_string(d, "rhs", FALSE);
20522 729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset() Bram Moolenaar <Bram@vim.org> parents: 20516 diff changeset	2655 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	2656 {
26915 3631d2deb36c patch 8.2.3986: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 26913 diff changeset	2657 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	2658 return;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2659 }
20516 d9e3fdf26cb9 patch 8.2.0812: mapset() does not properly handle <> notation Bram Moolenaar <Bram@vim.org> parents: 20510 diff changeset	2660 orig_rhs = rhs;
30007 4123e4bd1708 patch 9.0.0341: mapset() does not restore <Nop> mapping properly Bram Moolenaar <Bram@vim.org> parents: 29994 diff changeset	2661 if (STRICMP(rhs, "<nop>") == 0) // "<Nop>" means nothing
4123e4bd1708 patch 9.0.0341: mapset() does not restore <Nop> mapping properly Bram Moolenaar <Bram@vim.org> parents: 29994 diff changeset	2662 rhs = (char_u *)"";
4123e4bd1708 patch 9.0.0341: mapset() does not restore <Nop> mapping properly Bram Moolenaar <Bram@vim.org> parents: 29994 diff changeset	2663 else
4123e4bd1708 patch 9.0.0341: mapset() does not restore <Nop> mapping properly Bram Moolenaar <Bram@vim.org> parents: 29994 diff changeset	2664 rhs = replace_termcodes(rhs, &arg_buf,
20516 d9e3fdf26cb9 patch 8.2.0812: mapset() does not properly handle <> notation Bram Moolenaar <Bram@vim.org> parents: 20510 diff changeset	2665 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	2666
29442 827d9f2b7a71 patch 9.0.0063: too many type casts for dict_get functions Bram Moolenaar <Bram@vim.org> parents: 29318 diff changeset	2667 noremap = dict_get_number(d, "noremap") ? REMAP_NONE: 0;
827d9f2b7a71 patch 9.0.0063: too many type casts for dict_get functions Bram Moolenaar <Bram@vim.org> parents: 29318 diff changeset	2668 if (dict_get_number(d, "script") != 0)
20506 aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2669 noremap = REMAP_SCRIPT;
29442 827d9f2b7a71 patch 9.0.0063: too many type casts for dict_get functions Bram Moolenaar <Bram@vim.org> parents: 29318 diff changeset	2670 expr = dict_get_number(d, "expr") != 0;
827d9f2b7a71 patch 9.0.0063: too many type casts for dict_get functions Bram Moolenaar <Bram@vim.org> parents: 29318 diff changeset	2671 silent = dict_get_number(d, "silent") != 0;
827d9f2b7a71 patch 9.0.0063: too many type casts for dict_get functions Bram Moolenaar <Bram@vim.org> parents: 29318 diff changeset	2672 sid = dict_get_number(d, "sid");
827d9f2b7a71 patch 9.0.0063: too many type casts for dict_get functions Bram Moolenaar <Bram@vim.org> parents: 29318 diff changeset	2673 scriptversion = dict_get_number(d, "scriptversion");
827d9f2b7a71 patch 9.0.0063: too many type casts for dict_get functions Bram Moolenaar <Bram@vim.org> parents: 29318 diff changeset	2674 lnum = dict_get_number(d, "lnum");
827d9f2b7a71 patch 9.0.0063: too many type casts for dict_get functions Bram Moolenaar <Bram@vim.org> parents: 29318 diff changeset	2675 buffer = dict_get_number(d, "buffer");
827d9f2b7a71 patch 9.0.0063: too many type casts for dict_get functions Bram Moolenaar <Bram@vim.org> parents: 29318 diff changeset	2676 nowait = dict_get_number(d, "nowait") != 0;
24529 db2b4e867d06 patch 8.2.2804: setting buffer local mapping with mapset() changes global Bram Moolenaar <Bram@vim.org> parents: 23493 diff changeset	2677 // 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	2678
db2b4e867d06 patch 8.2.2804: setting buffer local mapping with mapset() changes global Bram Moolenaar <Bram@vim.org> parents: 23493 diff changeset	2679 if (buffer)
20506 aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2680 {
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2681 map_table = curbuf->b_maphash;
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2682 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	2683 }
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2684
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2685 // 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	2686 if (buffer)
db2b4e867d06 patch 8.2.2804: setting buffer local mapping with mapset() changes global Bram Moolenaar <Bram@vim.org> parents: 23493 diff changeset	2687 {
db2b4e867d06 patch 8.2.2804: setting buffer local mapping with mapset() changes global Bram Moolenaar <Bram@vim.org> parents: 23493 diff changeset	2688 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	2689 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	2690 return;
db2b4e867d06 patch 8.2.2804: setting buffer local mapping with mapset() changes global Bram Moolenaar <Bram@vim.org> parents: 23493 diff changeset	2691 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	2692 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	2693 }
db2b4e867d06 patch 8.2.2804: setting buffer local mapping with mapset() changes global Bram Moolenaar <Bram@vim.org> parents: 23493 diff changeset	2694 else
db2b4e867d06 patch 8.2.2804: setting buffer local mapping with mapset() changes global Bram Moolenaar <Bram@vim.org> parents: 23493 diff changeset	2695 {
db2b4e867d06 patch 8.2.2804: setting buffer local mapping with mapset() changes global Bram Moolenaar <Bram@vim.org> parents: 23493 diff changeset	2696 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	2697 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	2698 return;
db2b4e867d06 patch 8.2.2804: setting buffer local mapping with mapset() changes global Bram Moolenaar <Bram@vim.org> parents: 23493 diff changeset	2699 }
29173 1ec1ba7e7728 patch 8.2.5106: default cmdwin mappings are re-mappable Bram Moolenaar <Bram@vim.org> parents: 29014 diff changeset	2700 do_map(MAPTYPE_UNMAP, arg, mode, is_abbr);
20506 aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2701 vim_free(arg);
aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2702
20522 729853a754ea patch 8.2.0815: maparg() does not provide enough information for mapset() Bram Moolenaar <Bram@vim.org> parents: 20516 diff changeset	2703 (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	2704 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	2705 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	2706 (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	2707 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	2708 lnum, 1);
20516 d9e3fdf26cb9 patch 8.2.0812: mapset() does not properly handle <> notation Bram Moolenaar <Bram@vim.org> parents: 20510 diff changeset	2709 vim_free(arg_buf);
20506 aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2710 }
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2711 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2712
20506 aee0b72ca6d6 patch 8.2.0807: cannot easily restore a mapping Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	2713
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2714 #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	2715
28773 d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named Bram Moolenaar <Bram@vim.org> parents: 28686 diff changeset	2716 # 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	2717
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2718 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2719 * 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	2720 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2721 struct initmap
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2722 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2723 char_u *arg;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2724 int mode;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2725 };
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2726
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2727 # ifdef FEAT_GUI_MSWIN
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2728 // 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	2729 static struct initmap initmappings[] =
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2730 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2731 // 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	2732 {(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	2733 {(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	2734 {(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	2735 {(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	2736 {(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	2737 {(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	2738 {(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	2739 // 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	2740 };
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2741 # endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2742
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2743 # 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	2744 // 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	2745 static struct initmap cinitmappings[] =
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2746 {
28773 d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named Bram Moolenaar <Bram@vim.org> parents: 28686 diff changeset	2747 {(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	2748 {(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	2749 {(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	2750 {(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	2751
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2752 // paste, copy and cut
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2753 # 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	2754 {(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	2755 {(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	2756 {(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	2757 {(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	2758 {(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	2759 {(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	2760 {(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	2761 # else
28773 d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named Bram Moolenaar <Bram@vim.org> parents: 28686 diff changeset	2762 {(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	2763 {(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	2764 {(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	2765 {(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	2766 {(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	2767 {(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	2768 # endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2769 };
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2770 # endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2771
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2772 # if defined(MACOS_X)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2773 static struct initmap initmappings[] =
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2774 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2775 // Use the Standard MacOS binding.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2776 // 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	2777 {(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	2778 {(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	2779 {(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	2780 {(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	2781 {(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	2782 {(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	2783 };
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2784 # endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2785
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2786 # undef VIS_SEL
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2787 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2788
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2789 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2790 * Set up default mappings.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2791 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2792 void
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2793 init_mappings(void)
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 #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	2796 int i;
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 # 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	2799 # ifdef VIMDLL
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2800 if (!gui.starting)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2801 # endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2802 {
24768 7334bf933510 patch 8.2.2922: computing array length is done in various ways Bram Moolenaar <Bram@vim.org> parents: 24574 diff changeset	2803 for (i = 0; i < (int)ARRAY_LENGTH(cinitmappings); ++i)
29173 1ec1ba7e7728 patch 8.2.5106: default cmdwin mappings are re-mappable Bram Moolenaar <Bram@vim.org> parents: 29014 diff changeset	2804 add_map(cinitmappings[i].arg, cinitmappings[i].mode, FALSE);
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2805 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2806 # endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2807 # 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	2808 for (i = 0; i < (int)ARRAY_LENGTH(initmappings); ++i)
29173 1ec1ba7e7728 patch 8.2.5106: default cmdwin mappings are re-mappable Bram Moolenaar <Bram@vim.org> parents: 29014 diff changeset	2809 add_map(initmappings[i].arg, initmappings[i].mode, FALSE);
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2810 # endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2811 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2812 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2813
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2814 #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	2815 \|\| defined(PROTO)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2816 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2817 * Add a mapping "map" for mode "mode".
29173 1ec1ba7e7728 patch 8.2.5106: default cmdwin mappings are re-mappable Bram Moolenaar <Bram@vim.org> parents: 29014 diff changeset	2818 * When "nore" is TRUE use MAPTYPE_NOREMAP.
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2819 * 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	2820 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2821 void
29173 1ec1ba7e7728 patch 8.2.5106: default cmdwin mappings are re-mappable Bram Moolenaar <Bram@vim.org> parents: 29014 diff changeset	2822 add_map(char_u *map, int mode, int nore)
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2823 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2824 char_u *s;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2825 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	2826
23493 f8382c4e6551 patch 8.2.2289: Vim9: 'cpo' can become empty Bram Moolenaar <Bram@vim.org> parents: 23229 diff changeset	2827 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	2828 s = vim_strsave(map);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2829 if (s != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2830 {
29173 1ec1ba7e7728 patch 8.2.5106: default cmdwin mappings are re-mappable Bram Moolenaar <Bram@vim.org> parents: 29014 diff changeset	2831 (void)do_map(nore ? MAPTYPE_NOREMAP : MAPTYPE_MAP, s, mode, FALSE);
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2832 vim_free(s);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2833 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2834 p_cpo = cpo_save;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2835 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2836 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2837
17940 079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2838 #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	2839 /*
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2840 * 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	2841 * 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	2842 * 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	2843 * 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	2844 * 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	2845 *
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2846 * 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	2847 * commands.
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2848 * 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	2849 * 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	2850 *
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2851 * 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	2852 */
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2853 typedef struct
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2854 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2855 int from;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2856 int to;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2857 } 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	2858
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2859 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	2860
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2861 /*
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2862 * 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	2863 * 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	2864 */
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2865 static void
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2866 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	2867 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2868 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	2869 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	2870 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	2871
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2872 // 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	2873 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	2874 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2875 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	2876 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	2877
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2878 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	2879 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2880 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	2881 return;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2882 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2883 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	2884 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	2885 else
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2886 b = i;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2887 }
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 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	2890 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	2891
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2892 // 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	2893 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	2894 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	2895 (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	2896 ++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	2897 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	2898 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	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 /*
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2902 * 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	2903 */
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2904 int
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2905 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	2906 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2907 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	2908 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	2909 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	2910
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2911 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	2912 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2913 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	2914 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	2915
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2916 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	2917 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	2918 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	2919 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	2920 else
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2921 b = i;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2922 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2923 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	2924 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2925
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2926 void
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2927 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	2928 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2929 int i;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2930
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2931 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	2932 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	2933 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	2934 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2935
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2936 /*
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2937 * 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	2938 * 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	2939 */
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2940 void
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2941 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	2942 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2943 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	2944 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	2945 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	2946
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2947 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	2948 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	2949
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2950 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	2951 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2952 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	2953 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	2954 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2955 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	2956 ++p2;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2957 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2958 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	2959 ++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	2960 else
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2961 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	2962 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	2963 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2964 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	2965 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2966 ++p;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2967 break;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2968 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2969 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	2970 ++p;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2971 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	2972 to = NUL;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2973 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	2974 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2975 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	2976 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	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 ++p;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2980 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	2981 }
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 else
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 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	2986 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2987 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	2988 ++p2;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2989 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	2990 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2991 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2992 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	2993 {
26913 d4e61d61afd9 patch 8.2.3985: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 26877 diff changeset	2994 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	2995 transchar(from));
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2996 return;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2997 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2998
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2999 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	3000 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	3001 else
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	3002 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	3003
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	3004 // 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	3005 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	3006 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	3007 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	3008 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	3009 if (*p == ';')
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	3010 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	3011 p = p2;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	3012 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	3013 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	3014 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	3015 {
26913 d4e61d61afd9 patch 8.2.3985: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 26877 diff changeset	3016 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	3017 return;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	3018 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	3019 ++p;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	3020 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	3021 break;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	3022 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	3023 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	3024 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	3025 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	3026 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	3027 #endif
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	3028
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3029 static void
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3030 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	3031 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3032 int mode;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3033 char_u *cmdp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3034
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3035 cmdp = eap->cmd;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3036 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	3037
29173 1ec1ba7e7728 patch 8.2.5106: default cmdwin mappings are re-mappable Bram Moolenaar <Bram@vim.org> parents: 29014 diff changeset	3038 switch (do_map(*cmdp == 'n' ? MAPTYPE_NOREMAP
1ec1ba7e7728 patch 8.2.5106: default cmdwin mappings are re-mappable Bram Moolenaar <Bram@vim.org> parents: 29014 diff changeset	3039 : *cmdp == 'u' ? MAPTYPE_UNMAP : MAPTYPE_MAP,
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3040 eap->arg, mode, isabbrev))
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3041 {
26865 bce848ec8b1b patch 8.2.3961: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 26861 diff changeset	3042 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	3043 break;
25306 078edc1821bf patch 8.2.3190: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 25302 diff changeset	3044 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	3045 : _(e_no_such_mapping)));
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3046 break;
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
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 * ":abbreviate" and friends.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3052 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3053 void
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3054 ex_abbreviate(exarg_T *eap)
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 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	3057 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3058
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 * ":map" and friends.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3061 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3062 void
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3063 ex_map(exarg_T *eap)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3064 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3065 // 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	3066 // 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	3067 if (secure)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3068 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3069 secure = 2;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3070 msg_outtrans(eap->cmd);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3071 msg_putchar('\n');
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3072 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3073 do_exmap(eap, FALSE);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3074 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3075
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3076 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3077 * ":unmap" and friends.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3078 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3079 void
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3080 ex_unmap(exarg_T *eap)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3081 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3082 do_exmap(eap, FALSE);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3083 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3084
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3085 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3086 * ":mapclear" and friends.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3087 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3088 void
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3089 ex_mapclear(exarg_T *eap)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3090 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3091 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	3092 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3093
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3094 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3095 * ":abclear" and friends.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3096 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3097 void
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3098 ex_abclear(exarg_T *eap)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3099 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	3100 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	3101 }

Mercurial > vim

annotate src/map.c @ 30299:5c181bb6c855