vim: src/map.c annotate

annotate src/map.c @ 18301:506bf60a30a0 v8.1.2145

patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Commit: https://github.com/vim/vim/commit/459fd785e4a8d044147a3f83a5fca8748528aa84 Author: Bram Moolenaar <Bram@vim.org> Date: Sun Oct 13 16:43:39 2019 +0200 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Problem: Cannot map <C-H> when modifyOtherKeys is enabled. Solution: Add the <C-H> mapping twice, both with modifier and as 0x08. Use only the first one when modifyOtherKeys has been detected.

author	Bram Moolenaar <Bram@vim.org>
date	Sun, 13 Oct 2019 16:45:04 +0200
parents	ec4248c4b92c
children	1784afa654c8

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 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	11 * map.c: functions for maps and abbreviations
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 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	34 #define MAP_HASH(mode, c1) (((mode) & (NORMAL + VISUAL + SELECTMODE + OP_PENDING + TERMINAL)) ? (c1) : ((c1) ^ 0x80))
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 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	68 vim_memset(maphash, 0, sizeof(maphash));
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;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	87 vim_free(mp);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	88 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	89
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	90 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	91 * 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	92 * 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	93 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	94 static char_u *
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	95 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	96 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	97 garray_T mapmode;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	98
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	99 ga_init2(&mapmode, 1, 7);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	100
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	101 if ((mode & (INSERT + CMDLINE)) == INSERT + CMDLINE)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	102 ga_append(&mapmode, '!'); // :map!
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	103 else if (mode & INSERT)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	104 ga_append(&mapmode, 'i'); // :imap
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	105 else if (mode & LANGMAP)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	106 ga_append(&mapmode, 'l'); // :lmap
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	107 else if (mode & CMDLINE)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	108 ga_append(&mapmode, 'c'); // :cmap
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	109 else if ((mode & (NORMAL + VISUAL + SELECTMODE + OP_PENDING))
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	110 == NORMAL + VISUAL + SELECTMODE + OP_PENDING)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	111 ga_append(&mapmode, ' '); // :map
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	112 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	113 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	114 if (mode & NORMAL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	115 ga_append(&mapmode, 'n'); // :nmap
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	116 if (mode & OP_PENDING)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	117 ga_append(&mapmode, 'o'); // :omap
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	118 if (mode & TERMINAL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	119 ga_append(&mapmode, 't'); // :tmap
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	120 if ((mode & (VISUAL + SELECTMODE)) == VISUAL + SELECTMODE)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	121 ga_append(&mapmode, 'v'); // :vmap
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	122 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	123 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	124 if (mode & VISUAL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	125 ga_append(&mapmode, 'x'); // :xmap
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	126 if (mode & SELECTMODE)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	127 ga_append(&mapmode, 's'); // :smap
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	128 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	129 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	130
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	131 ga_append(&mapmode, NUL);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	132 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	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 static void
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	136 showmap(
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	137 mapblock_T *mp,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	138 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	139 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	140 int len = 1;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	141 char_u *mapchars;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	142
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	143 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	144 return;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	145
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	146 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	147 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	148 msg_putchar('\n');
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	149 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	150 return;
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
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	153 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	154 if (mapchars != NULL)
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 msg_puts((char *)mapchars);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	157 len = (int)STRLEN(mapchars);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	158 vim_free(mapchars);
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
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	161 while (++len <= 3)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	162 msg_putchar(' ');
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 // 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	165 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	166 do
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 msg_putchar(' '); // padd with blanks
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	169 ++len;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	170 } while (len < 12);
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 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	173 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	174 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	175 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	176 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	177 msg_putchar(' ');
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	178
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	179 if (local)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	180 msg_putchar('@');
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	181 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	182 msg_putchar(' ');
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	183
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	184 // 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	185 // 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	186 if (*mp->m_str == NUL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	187 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	188 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	189 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	190 // Remove escaping of CSI, because "m_str" is in a format to be used
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	191 // as typeahead.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	192 char_u *s = vim_strsave(mp->m_str);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	193 if (s != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	194 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	195 vim_unescape_csi(s);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	196 msg_outtrans_special(s, FALSE, 0);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	197 vim_free(s);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	198 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	199 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	200 #ifdef FEAT_EVAL
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	201 if (p_verbose > 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	202 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	203 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	204 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	205 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	206
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	207 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	208 * map[!] : show all key mappings
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	209 * 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	210 * 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	211 * 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	212 * 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	213 * abbr : show all abbreviations
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	214 * 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	215 * 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	216 * 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	217 * 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	218 *
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	219 * maptype: 0 for :map, 1 for :unmap, 2 for noremap.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	220 *
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	221 * 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	222 * it will be modified.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	223 *
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	224 * for :map mode is NORMAL + VISUAL + SELECTMODE + OP_PENDING
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	225 * for :map! mode is INSERT + CMDLINE
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	226 * for :cmap mode is CMDLINE
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	227 * for :imap mode is INSERT
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	228 * for :lmap mode is LANGMAP
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	229 * for :nmap mode is NORMAL
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	230 * for :vmap mode is VISUAL + SELECTMODE
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	231 * for :xmap mode is VISUAL
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	232 * for :smap mode is SELECTMODE
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	233 * for :omap mode is OP_PENDING
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	234 * for :tmap mode is TERMINAL
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	235 *
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	236 * for :abbr mode is INSERT + CMDLINE
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	237 * for :iabbr mode is INSERT
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	238 * for :cabbr mode is CMDLINE
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	239 *
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	240 * Return 0 for success
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	241 * 1 for invalid arguments
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	242 * 2 for no match
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	243 * 4 for out of mem
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	244 * 5 for entry not unique
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	245 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	246 int
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	247 do_map(
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	248 int maptype,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	249 char_u *arg,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	250 int mode,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	251 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	252 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	253 char_u *keys;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	254 mapblock_T mp, *mpp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	255 char_u *rhs;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	256 char_u *p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	257 int n;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	258 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	259 int hasarg;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	260 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	261 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	262 int keyround;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	263 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	264 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	265 char_u *arg_buf = NULL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	266 int retval = 0;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	267 int do_backslash;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	268 mapblock_T **abbr_table;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	269 mapblock_T **map_table;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	270 int unique = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	271 int nowait = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	272 int silent = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	273 int special = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	274 #ifdef FEAT_EVAL
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	275 int expr = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	276 #endif
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	277 int did_simplify = FALSE;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	278 int noremap;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	279 char_u *orig_rhs;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	280
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	281 keys = arg;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	282 map_table = maphash;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	283 abbr_table = &first_abbr;
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 // For ":noremap" don't remap, otherwise do remap.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	286 if (maptype == 2)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	287 noremap = REMAP_NONE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	288 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	289 noremap = REMAP_YES;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	290
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	291 // 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	292 // any order.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	293 for (;;)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	294 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	295 // 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	296 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	297 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	298 keys = skipwhite(keys + 8);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	299 map_table = curbuf->b_maphash;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	300 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	301 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	302 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	303
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	304 // 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	305 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	306 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	307 keys = skipwhite(keys + 8);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	308 nowait = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	309 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	310 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	311
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	312 // 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	313 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	314 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	315 keys = skipwhite(keys + 8);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	316 silent = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	317 continue;
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
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	320 // 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	321 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	322 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	323 keys = skipwhite(keys + 9);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	324 special = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	325 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	326 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	327
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	328 #ifdef FEAT_EVAL
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	329 // 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	330 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	331 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	332 keys = skipwhite(keys + 8);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	333 noremap = REMAP_SCRIPT;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	334 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	335 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	336
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	337 // 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	338 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	339 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	340 keys = skipwhite(keys + 6);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	341 expr = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	342 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	343 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	344 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	345 // 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	346 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	347 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	348 keys = skipwhite(keys + 8);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	349 unique = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	350 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	351 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	352 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	353 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	354
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	355 validate_maphash();
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	356
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	357 // 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	358 // 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	359 // 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	360 p = keys;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	361 do_backslash = (vim_strchr(p_cpo, CPO_BSLASH) == NULL);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	362 while (p && (maptype == 1 \|\| !VIM_ISWHITE(p)))
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	363 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	364 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	365 p[1] != NUL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	366 ++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	367 ++p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	368 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	369 if (*p != NUL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	370 *p++ = NUL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	371
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	372 p = skipwhite(p);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	373 rhs = p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	374 hasarg = (*rhs != NUL);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	375 haskey = (*keys != NUL);
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	376 do_print = !haskey \|\| (maptype != 1 && !hasarg);
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	377
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	378 // check for :unmap without argument
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	379 if (maptype == 1 && !haskey)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	380 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	381 retval = 1;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	382 goto theend;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	383 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	384
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	385 // 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	386 // 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	387 // 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	388 // 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	389 // 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	390 // 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	391 // 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	392 // 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	393 // modifyOtherKeys is working.
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	394 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	395 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	396 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	397 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	398
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	399 if (special)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	400 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	401 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	402 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	403 (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	404 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	405 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	406 }
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	407 orig_rhs = rhs;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	408 if (hasarg)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	409 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	410 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	411 rhs = (char_u *)"";
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	412 else
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	413 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	414 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	415 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	416
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	417 /*
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	418 * 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	419 * "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	420 */
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	421 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	422 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	423 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	424 int did_local = FALSE;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	425 int round;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	426 int hash;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	427 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	428
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	429 if (keyround == 2)
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	430 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	431 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	432 break;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	433 keys = alt_keys_buf;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	434 }
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	435 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	436 // 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	437 keys = alt_keys_buf;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	438
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	439 // 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	440 if (haskey)
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	441 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	442 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	443 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	444 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	445 retval = 1;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	446 goto theend;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	447 }
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	448
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	449 if (abbrev && maptype != 1)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	450 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	451 // 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	452 // 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	453 // 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	454 // 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	455 if (has_mbyte)
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	456 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	457 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	458 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	459
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	460 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	461 last = first;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	462 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	463 n = 1;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	464 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	465 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	466 ++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	467 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	468 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	469 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	470 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	471 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	472 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	473 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	474 retval = 1;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	475 goto theend;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	476 }
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	477 }
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	478 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	479 // ends in keyword char
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	480 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	481 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	482 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	483 retval = 1;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	484 goto theend;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	485 }
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	486 // 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	487 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	488 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	489 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	490 retval = 1;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	491 goto theend;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	492 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	493 }
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 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	497 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	498 // no abbreviations
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	499
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	500 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	501 msg_start();
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	502
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	503 // Check if a new local mapping wasn't already defined globally.
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	504 if (map_table == curbuf->b_maphash && haskey && hasarg && maptype != 1)
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	505 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	506 // 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	507 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	508 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	509 if (abbrev)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	510 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	511 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	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 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	514 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	515 else
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	516 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	517 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	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 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	520 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	521 && 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	522 && unique
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	523 && 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	524 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	525 if (abbrev)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	526 semsg(_(
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	527 "E224: global abbreviation already exists for %s"),
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	528 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	529 else
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	530 semsg(_(
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	531 "E225: global mapping already exists for %s"),
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	532 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	533 retval = 5;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	534 goto theend;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	535 }
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	536 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	537 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	538 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	539
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	540 // When listing global mappings, also list buffer-local ones here.
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	541 if (map_table != curbuf->b_maphash && !hasarg && maptype != 1)
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	542 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	543 // 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	544 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	545 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	546 if (abbrev)
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	547 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	548 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	549 break;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	550 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	551 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	552 else
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	553 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	554 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	555 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	556 // 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	557 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	558 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	559 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	560 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	561 showmap(mp, TRUE);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	562 did_local = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	563 }
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	564 else
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	565 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	566 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	567 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	568 (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	569 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	570 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	571 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	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 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	576 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	577 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	578
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	579 // 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	580 // 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	581 // a matching 'from' part, a second time, if the first fails, to unmap
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	582 // an entry with a matching 'to' part. This was done to allow ":ab foo
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	583 // bar" to be unmapped by typing ":unab foo", where "foo" will be
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	584 // replaced by "bar" because of the abbreviation.
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	585 for (round = 0; (round == 0 \|\| maptype == 1) && round <= 1
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	586 && !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	587 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	588 // 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	589 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	590 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	591 if (abbrev)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	592 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	593 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	594 break;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	595 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	596 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	597 else
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	598 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	599 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	600 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	601
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	602 if (!(mp->m_mode & mode)) // skip entries with wrong mode
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	603 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	604 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	605 continue;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	606 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	607 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	608 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	609 showmap(mp, map_table != maphash);
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	610 did_it = TRUE;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	611 }
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	612 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	613 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	614 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	615 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	616 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	617 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	618 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	619 else
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	620 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	621 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	622 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	623 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	624 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	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 (maptype == 1)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	627 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	628 // Delete entry.
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	629 // 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	630 // 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	631 // 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	632 // trailing space.
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	633 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	634 \|\| *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	635 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	636 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	637 continue;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	638 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	639 // 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	640 // 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	641 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	642 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	643 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	644 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	645 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	646 showmap(mp, map_table != maphash);
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	647 did_it = TRUE;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	648 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	649 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	650 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	651 mpp = &(mp->m_next);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	652 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	653 }
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	654 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	655 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	656 if (abbrev)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	657 semsg(_(
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	658 "E226: abbreviation already exists for %s"),
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	659 p);
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	660 else
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	661 semsg(_(
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	662 "E227: mapping already exists for %s"),
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	663 p);
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	664 retval = 5;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	665 goto theend;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	666 }
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	667 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	668 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	669 // 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	670 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	671 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	672 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	673 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	674
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	675 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	676 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	677 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	678 goto theend;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	679 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	680 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	681 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	682 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	683 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	684 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	685 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	686 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	687 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	688 mp->m_simplified =
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	689 did_simplify && keyround == 1;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	690 #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	691 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	692 mp->m_script_ctx = current_sctx;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	693 mp->m_script_ctx.sc_lnum += sourcing_lnum;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	694 #endif
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	695 did_it = TRUE;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	696 }
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	697 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	698 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	699 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	700 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	701 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	702 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	703
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	704 // 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	705 // list.
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	706 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	707 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	708 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	709 *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	710 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	711 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	712
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	713 continue; // continue with *mpp
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	714 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	715 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	716 }
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	717 mpp = &(mp->m_next);
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	718 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	719 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	720 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	721
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	722 if (maptype == 1)
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	723 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	724 // delete entry
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	725 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	726 retval = 2; // no match
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	727 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	728 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	729 // 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	730 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	731 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	732 else
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	733 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	734 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	735 continue;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	736 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	737
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	738 if (!haskey \|\| !hasarg)
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	739 {
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	740 // print entries
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	741 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	742 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	743 if (abbrev)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	744 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	745 else
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	746 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	747 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	748 goto theend; // listing finished
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	749 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	750
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	751 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	752 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	753
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	754 // Get here when adding a new entry to the maphash[] list or abbrlist.
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	755 mp = ALLOC_ONE(mapblock_T);
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	756 if (mp == NULL)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	757 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	758 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	759 goto theend;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	760 }
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	761
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	762 // If CTRL-C has been mapped, don't always use 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	763 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	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 (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	766 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	767 else
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	768 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	769 }
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	770
18301 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_keys = vim_strsave(keys);
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	772 mp->m_str = 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	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 if (mp->m_keys == NULL \|\| mp->m_str == NULL)
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	775 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	776 vim_free(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	777 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	778 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	779 vim_free(mp);
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	780 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	781 goto theend;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	782 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	783 mp->m_keylen = (int)STRLEN(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	784 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	785 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	786 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	787 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	788 mp->m_simplified = did_simplify && keyround == 1;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	789 #ifdef FEAT_EVAL
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	790 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	791 mp->m_script_ctx = current_sctx;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	792 mp->m_script_ctx.sc_lnum += sourcing_lnum;
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	793 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	794
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	795 // add the new entry in front of the abbrlist or maphash[] list
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)
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 mp->m_next = *abbr_table;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	799 *abbr_table = mp;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	800 }
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	801 else
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	802 {
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	803 n = 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	804 mp->m_next = map_table[n];
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	805 map_table[n] = mp;
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	806 }
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 theend:
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	810 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	811 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	812 vim_free(arg_buf);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	813 return retval;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	814 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	815
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	816 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	817 * 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	818 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	819 static int
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	820 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	821 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	822 char_u *p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	823 int modec;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	824 int mode;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	825
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	826 p = *cmdp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	827 modec = *p++;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	828 if (modec == 'i')
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	829 mode = INSERT; // :imap
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	830 else if (modec == 'l')
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	831 mode = LANGMAP; // :lmap
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	832 else if (modec == 'c')
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	833 mode = CMDLINE; // :cmap
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	834 else if (modec == 'n' && *p != 'o') // avoid :noremap
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	835 mode = NORMAL; // :nmap
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	836 else if (modec == 'v')
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	837 mode = VISUAL + SELECTMODE; // :vmap
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	838 else if (modec == 'x')
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	839 mode = VISUAL; // :xmap
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	840 else if (modec == 's')
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	841 mode = SELECTMODE; // :smap
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	842 else if (modec == 'o')
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	843 mode = OP_PENDING; // :omap
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	844 else if (modec == 't')
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	845 mode = TERMINAL; // :tmap
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	846 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	847 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	848 --p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	849 if (forceit)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	850 mode = INSERT + CMDLINE; // :map !
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	851 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	852 mode = VISUAL + SELECTMODE + NORMAL + OP_PENDING;// :map
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	853 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	854
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	855 *cmdp = p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	856 return mode;
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 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	860 * Clear all mappings or abbreviations.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	861 * 'abbr' should be FALSE for mappings, TRUE for abbreviations.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	862 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	863 static void
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	864 map_clear(
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	865 char_u *cmdp,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	866 char_u *arg UNUSED,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	867 int forceit,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	868 int abbr)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	869 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	870 int mode;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	871 int local;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	872
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	873 local = (STRCMP(arg, "<buffer>") == 0);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	874 if (!local && *arg != NUL)
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 emsg(_(e_invarg));
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	877 return;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	878 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	879
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	880 mode = get_map_mode(&cmdp, forceit);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	881 map_clear_int(curbuf, mode, local, abbr);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	882 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	883
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	884 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	885 * Clear all mappings in "mode".
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	886 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	887 void
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	888 map_clear_int(
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	889 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	890 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	891 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	892 int abbr) // TRUE for abbreviations
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	893 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	894 mapblock_T mp, *mpp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	895 int hash;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	896 int new_hash;
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 validate_maphash();
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	899
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	900 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	901 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	902 if (abbr)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	903 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	904 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	905 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	906 if (local)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	907 mpp = &buf->b_first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	908 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	909 mpp = &first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	910 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	911 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	912 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	913 if (local)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	914 mpp = &buf->b_maphash[hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	915 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	916 mpp = &maphash[hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	917 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	918 while (*mpp != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	919 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	920 mp = *mpp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	921 if (mp->m_mode & mode)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	922 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	923 mp->m_mode &= ~mode;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	924 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	925 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	926 map_free(mpp);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	927 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	928 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	929 // 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	930 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	931 if (!abbr && new_hash != hash)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	932 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	933 *mpp = mp->m_next;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	934 if (local)
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 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	937 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	938 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	939 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	940 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	941 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	942 maphash[new_hash] = mp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	943 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	944 continue; // continue with *mpp
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	945 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	946 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	947 mpp = &(mp->m_next);
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 }
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
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	952 #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	953 int
17946 ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes Bram Moolenaar <Bram@vim.org> parents: 17940 diff changeset	954 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	955 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	956 int mode = 0;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	957
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	958 if (vim_strchr(modechars, 'n') != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	959 mode \|= NORMAL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	960 if (vim_strchr(modechars, 'v') != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	961 mode \|= VISUAL + SELECTMODE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	962 if (vim_strchr(modechars, 'x') != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	963 mode \|= VISUAL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	964 if (vim_strchr(modechars, 's') != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	965 mode \|= SELECTMODE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	966 if (vim_strchr(modechars, 'o') != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	967 mode \|= OP_PENDING;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	968 if (vim_strchr(modechars, 'i') != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	969 mode \|= INSERT;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	970 if (vim_strchr(modechars, 'l') != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	971 mode \|= LANGMAP;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	972 if (vim_strchr(modechars, 'c') != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	973 mode \|= CMDLINE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	974
17946 ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes Bram Moolenaar <Bram@vim.org> parents: 17940 diff changeset	975 return mode;
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes Bram Moolenaar <Bram@vim.org> parents: 17940 diff changeset	976 }
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes Bram Moolenaar <Bram@vim.org> parents: 17940 diff changeset	977
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes Bram Moolenaar <Bram@vim.org> parents: 17940 diff changeset	978 /*
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes Bram Moolenaar <Bram@vim.org> parents: 17940 diff changeset	979 * 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	980 * 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	981 * 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	982 */
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes Bram Moolenaar <Bram@vim.org> parents: 17940 diff changeset	983 int
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes Bram Moolenaar <Bram@vim.org> parents: 17940 diff changeset	984 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	985 {
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes Bram Moolenaar <Bram@vim.org> parents: 17940 diff changeset	986 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	987 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	988 int retval;
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes Bram Moolenaar <Bram@vim.org> parents: 17940 diff changeset	989
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	990 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	991
ec4248c4b92c patch 8.1.1969: popup window filter is used in all modes Bram Moolenaar <Bram@vim.org> parents: 17940 diff changeset	992 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	993 vim_free(buf);
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 return retval;
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 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	998
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	999 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1000 * 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	1001 * 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	1002 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1003 int
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1004 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	1005 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1006 mapblock_T *mp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1007 int hash;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1008 int exp_buffer = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1009
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1010 validate_maphash();
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1011
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1012 // 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	1013 for (;;)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1014 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1015 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	1016 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1017 if (abbr)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1018 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1019 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	1020 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1021 if (exp_buffer)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1022 mp = curbuf->b_first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1023 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1024 mp = first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1025 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1026 else if (exp_buffer)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1027 mp = curbuf->b_maphash[hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1028 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1029 mp = maphash[hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1030 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	1031 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1032 if ((mp->m_mode & mode)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1033 && 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	1034 return TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1035 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1036 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1037 if (exp_buffer)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1038 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1039 exp_buffer = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1040 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1041
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1042 return FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1043 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1044
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1045 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1046 * 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	1047 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1048 static int expand_mapmodes = 0;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1049 static int expand_isabbrev = 0;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1050 static int expand_buffer = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1051
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1052 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1053 * 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	1054 * or abbreviation names.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1055 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1056 char_u *
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1057 set_context_in_map_cmd(
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1058 expand_T *xp,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1059 char_u *cmd,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1060 char_u *arg,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1061 int forceit, // TRUE if '!' given
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1062 int isabbrev, // TRUE if abbreviation
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1063 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	1064 cmdidx_T cmdidx)
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 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	1067 xp->xp_context = EXPAND_NOTHING;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1068 else
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 (isunmap)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1071 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	1072 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1073 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1074 expand_mapmodes = INSERT + CMDLINE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1075 if (!isabbrev)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1076 expand_mapmodes += VISUAL + SELECTMODE + NORMAL + OP_PENDING;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1077 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1078 expand_isabbrev = isabbrev;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1079 xp->xp_context = EXPAND_MAPPINGS;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1080 expand_buffer = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1081 for (;;)
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 (STRNCMP(arg, "<buffer>", 8) == 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1084 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1085 expand_buffer = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1086 arg = skipwhite(arg + 8);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1087 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1088 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1089 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	1090 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1091 arg = skipwhite(arg + 8);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1092 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1093 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1094 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	1095 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1096 arg = skipwhite(arg + 8);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1097 continue;
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 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	1100 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1101 arg = skipwhite(arg + 8);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1102 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1103 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1104 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	1105 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1106 arg = skipwhite(arg + 9);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1107 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1108 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1109 #ifdef FEAT_EVAL
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1110 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	1111 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1112 arg = skipwhite(arg + 8);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1113 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1114 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1115 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	1116 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1117 arg = skipwhite(arg + 6);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1118 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1119 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1120 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1121 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1122 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1123 xp->xp_pattern = arg;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1124 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1125
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1126 return NULL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1127 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1128
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1129 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1130 * 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	1131 * 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	1132 * 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	1133 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1134 int
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1135 ExpandMappings(
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1136 regmatch_T *regmatch,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1137 int *num_file,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1138 char_u ***file)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1139 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1140 mapblock_T *mp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1141 int hash;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1142 int count;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1143 int round;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1144 char_u *p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1145 int i;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1146
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1147 validate_maphash();
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1148
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1149 *num_file = 0; // return values in case of FAIL
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1150 *file = NULL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1151
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1152 // round == 1: Count the matches.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1153 // round == 2: Build the array to keep the matches.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1154 for (round = 1; round <= 2; ++round)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1155 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1156 count = 0;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1157
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1158 for (i = 0; i < 7; ++i)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1159 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1160 if (i == 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1161 p = (char_u *)"<silent>";
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1162 else if (i == 1)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1163 p = (char_u *)"<unique>";
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1164 #ifdef FEAT_EVAL
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1165 else if (i == 2)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1166 p = (char_u *)"<script>";
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1167 else if (i == 3)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1168 p = (char_u *)"<expr>";
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1169 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1170 else if (i == 4 && !expand_buffer)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1171 p = (char_u *)"<buffer>";
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1172 else if (i == 5)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1173 p = (char_u *)"<nowait>";
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1174 else if (i == 6)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1175 p = (char_u *)"<special>";
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1176 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1177 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1178
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1179 if (vim_regexec(regmatch, p, (colnr_T)0))
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1180 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1181 if (round == 1)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1182 ++count;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1183 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1184 (*file)[count++] = vim_strsave(p);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1185 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1186 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1187
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1188 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	1189 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1190 if (expand_isabbrev)
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 (hash > 0) // only one abbrev list
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1193 break; // for (hash)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1194 mp = first_abbr;
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 else if (expand_buffer)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1197 mp = curbuf->b_maphash[hash];
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 mp = maphash[hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1200 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	1201 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1202 if (mp->m_mode & expand_mapmodes)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1203 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1204 p = translate_mapping(mp->m_keys);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1205 if (p != NULL && vim_regexec(regmatch, p, (colnr_T)0))
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1206 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1207 if (round == 1)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1208 ++count;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1209 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1210 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1211 (*file)[count++] = p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1212 p = NULL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1213 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1214 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1215 vim_free(p);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1216 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1217 } // for (mp)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1218 } // for (hash)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1219
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1220 if (count == 0) // no match found
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1221 break; // for (round)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1222
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1223 if (round == 1)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1224 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1225 file = ALLOC_MULT(char_u , count);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1226 if (*file == NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1227 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1228 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1229 } // for (round)
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 (count > 1)
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 char_u **ptr1;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1234 char_u **ptr2;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1235 char_u **ptr3;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1236
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1237 // Sort the matches
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1238 sort_strings(*file, count);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1239
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1240 // Remove multiple entries
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1241 ptr1 = *file;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1242 ptr2 = ptr1 + 1;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1243 ptr3 = ptr1 + count;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1244
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1245 while (ptr2 < ptr3)
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 if (STRCMP(ptr1, ptr2))
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1248 ++ptr1 = ptr2++;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1249 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1250 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1251 vim_free(*ptr2++);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1252 count--;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1253 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1254 }
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 *num_file = count;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1258 return (count == 0 ? FAIL : OK);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1259 }
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 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1262 * Check for an abbreviation.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1263 * Cursor is at ptr[col].
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1264 * 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	1265 * 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	1266 * "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	1267 * 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	1268 *
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1269 * 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	1270 * 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	1271 * 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	1272 * "#include".
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1273 *
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1274 * 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	1275 * 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	1276 *
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1277 * 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	1278 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1279 int
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1280 check_abbr(
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1281 int c,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1282 char_u *ptr,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1283 int col,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1284 int mincol)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1285 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1286 int len;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1287 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	1288 int j;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1289 char_u *s;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1290 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	1291 mapblock_T *mp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1292 mapblock_T *mp2;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1293 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	1294 int is_id = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1295 int vim_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1296
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1297 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	1298 return FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1299
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1300 // 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	1301 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	1302 return FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1303
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1304 // 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	1305 // 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	1306 // 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	1307 // before it except white space.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1308 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	1309 return FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1310
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1311 if (has_mbyte)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1312 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1313 char_u *p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1314
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1315 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	1316 if (!vim_iswordp(p))
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1317 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	1318 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1319 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1320 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	1321 if (p > ptr)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1322 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	1323 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1324 clen = 1;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1325 while (p > ptr + mincol)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1326 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1327 p = mb_prevptr(ptr, p);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1328 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	1329 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1330 p += (*mb_ptr2len)(p);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1331 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1332 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1333 ++clen;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1334 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1335 scol = (int)(p - ptr);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1336 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1337 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1338 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1339 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	1340 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	1341 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1342 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1343 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	1344 if (col > 1)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1345 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	1346 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1347 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	1348 && (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	1349 ;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1350 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1351
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1352 if (scol < mincol)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1353 scol = mincol;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1354 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	1355 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1356 ptr += scol;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1357 len = col - scol;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1358 mp = curbuf->b_first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1359 mp2 = first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1360 if (mp == NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1361 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1362 mp = mp2;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1363 mp2 = NULL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1364 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1365 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	1366 ? (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	1367 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1368 int qlen = mp->m_keylen;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1369 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	1370 int match;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1371
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1372 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	1373 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1374 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	1375
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1376 // 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	1377 if (qe != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1378 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1379 q = qe;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1380 vim_unescape_csi(q);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1381 qlen = (int)STRLEN(q);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1382 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1383 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1384
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1385 // 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	1386 match = (mp->m_mode & State)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1387 && qlen == len
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1388 && !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	1389 if (q != mp->m_keys)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1390 vim_free(q);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1391 if (match)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1392 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1393 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1394 if (mp != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1395 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1396 // Found a match:
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1397 // 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	1398 // 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	1399 //
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1400 // 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	1401 // 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	1402 // 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	1403 // 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	1404 //
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1405 // 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	1406 // 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	1407 j = 0;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1408 if (c != Ctrl_RSB)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1409 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1410 // special key code, split up
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1411 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	1412 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1413 tb[j++] = K_SPECIAL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1414 tb[j++] = K_SECOND(c);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1415 tb[j++] = K_THIRD(c);
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 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1418 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1419 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	1420 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	1421 if (has_mbyte)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1422 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1423 // 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	1424 if (c >= ABBR_OFF)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1425 c -= ABBR_OFF;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1426 j += (*mb_char2bytes)(c, tb + j);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1427 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1428 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1429 tb[j++] = c;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1430 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1431 tb[j] = NUL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1432 // insert the last typed char
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1433 (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	1434 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1435 #ifdef FEAT_EVAL
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1436 if (mp->m_expr)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1437 s = eval_map_expr(mp->m_str, c);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1438 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1439 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1440 s = mp->m_str;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1441 if (s != NULL)
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 // insert the to string
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1444 (void)ins_typebuf(s, mp->m_noremap, 0, TRUE, mp->m_silent);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1445 // no abbrev. for these chars
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1446 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	1447 #ifdef FEAT_EVAL
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1448 if (mp->m_expr)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1449 vim_free(s);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1450 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1451 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1452
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1453 tb[0] = Ctrl_H;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1454 tb[1] = NUL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1455 if (has_mbyte)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1456 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	1457 while (len-- > 0) // delete the from string
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1458 (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	1459 return TRUE;
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 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1462 return FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1463 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1464
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1465 #ifdef FEAT_EVAL
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1466 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1467 * 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	1468 * special characters.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1469 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1470 char_u *
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1471 eval_map_expr(
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1472 char_u *str,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1473 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	1474 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1475 char_u *res;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1476 char_u *p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1477 char_u *expr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1478 pos_T save_cursor;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1479 int save_msg_col;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1480 int save_msg_row;
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 // 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	1483 // typeahead.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1484 expr = vim_strsave(str);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1485 if (expr == NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1486 return NULL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1487 vim_unescape_csi(expr);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1488
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1489 // 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	1490 // effects. Also restore the cursor position.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1491 ++textlock;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1492 ++ex_normal_lock;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1493 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	1494 save_cursor = curwin->w_cursor;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1495 save_msg_col = msg_col;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1496 save_msg_row = msg_row;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1497 p = eval_to_string(expr, NULL, FALSE);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1498 --textlock;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1499 --ex_normal_lock;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1500 curwin->w_cursor = save_cursor;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1501 msg_col = save_msg_col;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1502 msg_row = save_msg_row;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1503
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1504 vim_free(expr);
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 if (p == NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1507 return NULL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1508 // 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	1509 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	1510 vim_free(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 return res;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1513 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1514 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1515
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1516 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1517 * 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	1518 * 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	1519 * 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	1520 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1521 char_u *
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1522 vim_strsave_escape_csi(
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1523 char_u *p)
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 char_u *res;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1526 char_u s, d;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1527
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1528 // 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	1529 // illegal utf-8 byte:
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1530 // 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	1531 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	1532 if (res != NULL)
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 d = res;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1535 for (s = p; *s != NUL; )
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1536 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1537 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	1538 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1539 // Copy special key unmodified.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1540 d++ = s++;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1541 d++ = s++;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1542 d++ = s++;
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 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1545 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1546 // 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	1547 // 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	1548 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	1549 s += MB_CPTR2LEN(s);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1550 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1551 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1552 *d = NUL;
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 return res;
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
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 * 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	1559 * 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	1560 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1561 void
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1562 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	1563 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1564 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	1565
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1566 while (*s != NUL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1567 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1568 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	1569 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1570 *d++ = K_SPECIAL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1571 s += 3;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1572 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1573 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	1574 && 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	1575 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1576 *d++ = CSI;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1577 s += 3;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1578 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1579 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1580 d++ = s++;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1581 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1582 *d = NUL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1583 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1584
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1585 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1586 * 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	1587 * 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	1588 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1589 int
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1590 makemap(
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1591 FILE *fd,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1592 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	1593 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1594 mapblock_T *mp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1595 char_u c1, c2, c3;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1596 char_u *p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1597 char *cmd;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1598 int abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1599 int hash;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1600 int did_cpo = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1601 int i;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1602
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1603 validate_maphash();
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 // 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	1606 // 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	1607 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	1608 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	1609 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1610 if (abbr)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1611 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1612 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	1613 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1614 if (buf != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1615 mp = buf->b_first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1616 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1617 mp = first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1618 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1619 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1620 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1621 if (buf != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1622 mp = buf->b_maphash[hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1623 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1624 mp = maphash[hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1625 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1626
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1627 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	1628 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1629 // skip script-local mappings
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1630 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	1631 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1632
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1633 // 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	1634 // 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	1635 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	1636 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	1637 && p[2] == (int)KE_SNR)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1638 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1639 if (*p != NUL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1640 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1641
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1642 // 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	1643 // 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	1644 // 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	1645 c1 = NUL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1646 c2 = NUL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1647 c3 = NUL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1648 if (abbr)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1649 cmd = "abbr";
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1650 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1651 cmd = "map";
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1652 switch (mp->m_mode)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1653 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1654 case NORMAL + VISUAL + SELECTMODE + OP_PENDING:
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1655 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1656 case NORMAL:
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1657 c1 = 'n';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1658 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1659 case VISUAL:
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1660 c1 = 'x';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1661 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1662 case SELECTMODE:
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1663 c1 = 's';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1664 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1665 case OP_PENDING:
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1666 c1 = 'o';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1667 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1668 case NORMAL + VISUAL:
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1669 c1 = 'n';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1670 c2 = 'x';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1671 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1672 case NORMAL + SELECTMODE:
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1673 c1 = 'n';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1674 c2 = 's';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1675 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1676 case NORMAL + OP_PENDING:
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1677 c1 = 'n';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1678 c2 = 'o';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1679 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1680 case VISUAL + SELECTMODE:
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1681 c1 = 'v';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1682 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1683 case VISUAL + OP_PENDING:
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1684 c1 = 'x';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1685 c2 = 'o';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1686 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1687 case SELECTMODE + OP_PENDING:
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1688 c1 = 's';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1689 c2 = 'o';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1690 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1691 case NORMAL + VISUAL + SELECTMODE:
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1692 c1 = 'n';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1693 c2 = 'v';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1694 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1695 case NORMAL + VISUAL + OP_PENDING:
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1696 c1 = 'n';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1697 c2 = 'x';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1698 c3 = 'o';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1699 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1700 case NORMAL + SELECTMODE + OP_PENDING:
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1701 c1 = 'n';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1702 c2 = 's';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1703 c3 = 'o';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1704 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1705 case VISUAL + SELECTMODE + OP_PENDING:
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1706 c1 = 'v';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1707 c2 = 'o';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1708 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1709 case CMDLINE + INSERT:
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1710 if (!abbr)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1711 cmd = "map!";
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1712 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1713 case CMDLINE:
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1714 c1 = 'c';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1715 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1716 case INSERT:
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1717 c1 = 'i';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1718 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1719 case LANGMAP:
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1720 c1 = 'l';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1721 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1722 case TERMINAL:
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1723 c1 = 't';
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1724 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1725 default:
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1726 iemsg(_("E228: makemap: Illegal mode"));
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1727 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1728 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1729 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	1730 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1731 // 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	1732 // 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	1733 if (!did_cpo)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1734 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1735 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	1736 did_cpo = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1737 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1738 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	1739 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	1740 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	1741 did_cpo = TRUE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1742 if (did_cpo)
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 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	1745 \|\| put_eol(fd) < 0
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1746 \|\| 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	1747 \|\| put_eol(fd) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1748 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1749 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1750 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1751 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	1752 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1753 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	1754 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1755 if (fputs(cmd, fd) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1756 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1757 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	1758 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1759 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	1760 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1761 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	1762 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1763 #ifdef FEAT_EVAL
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1764 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	1765 && fputs("<script>", fd) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1766 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1767 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	1768 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1769 #endif
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 if ( putc(' ', fd) < 0
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1772 \|\| 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	1773 \|\| putc(' ', fd) < 0
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1774 \|\| 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	1775 \|\| put_eol(fd) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1776 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1777 c1 = c2;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1778 c2 = c3;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1779 c3 = NUL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1780 } while (c1 != NUL);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1781 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1782 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1783
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1784 if (did_cpo)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1785 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	1786 \|\| put_eol(fd) < 0
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1787 \|\| 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	1788 \|\| put_eol(fd) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1789 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1790 return OK;
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
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1793 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1794 * write escape string to file
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1795 * "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	1796 *
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1797 * 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	1798 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1799 int
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1800 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	1801 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1802 char_u *str = strstart;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1803 int c;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1804 int modifiers;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1805
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1806 // :map xx <Nop>
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1807 if (*str == NUL && what == 1)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1808 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1809 if (fprintf(fd, "<Nop>") < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1810 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1811 return OK;
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
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1814 for ( ; *str != NUL; ++str)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1815 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1816 char_u *p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1817
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1818 // 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	1819 // K_SPECIAL and CSI bytes
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1820 p = mb_unescape(&str);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1821 if (p != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1822 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1823 while (*p != NUL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1824 if (fputc(*p++, fd) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1825 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1826 --str;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1827 continue;
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
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1830 c = *str;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1831 // 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	1832 // when they are read back.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1833 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	1834 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1835 modifiers = 0x0;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1836 if (str[1] == KS_MODIFIER)
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 modifiers = str[2];
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1839 str += 3;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1840 c = *str;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1841 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1842 if (c == K_SPECIAL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1843 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1844 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	1845 str += 2;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1846 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1847 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	1848 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1849 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	1850 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1851 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1852 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1853 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1854
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1855 // 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	1856 // 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	1857 if (c == NL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1858 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1859 if (what == 2)
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 if (fprintf(fd, IF_EB("\\\026\n", "\\" CTRL_V_STR "\n")) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1862 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1863 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1864 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1865 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1866 if (fprintf(fd, "<NL>") < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1867 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1868 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1869 continue;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1870 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1871
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1872 // 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	1873 // 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	1874 // 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	1875 // 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	1876 // 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	1877 // ":map" rhs.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1878 // 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	1879 // 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	1880 // 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	1881 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	1882 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1883 if (putc('\\', fd) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1884 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1885 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1886 else if (c < ' ' \|\| c > '~' \|\| c == '\|'
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1887 \|\| (what == 0 && c == ' ')
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1888 \|\| (what == 1 && str == strstart && c == ' ')
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1889 \|\| (what != 2 && c == '<'))
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1890 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1891 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	1892 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1893 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1894 if (putc(c, fd) < 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1895 return FAIL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1896 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1897 return OK;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1898 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1899
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1900 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1901 * 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	1902 * Used after ":set term=xxx".
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1903 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1904 void
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1905 check_map_keycodes(void)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1906 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1907 mapblock_T *mp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1908 char_u *p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1909 int i;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1910 char_u buf[3];
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1911 char_u *save_name;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1912 int abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1913 int hash;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1914 buf_T *bp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1915
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1916 validate_maphash();
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1917 save_name = sourcing_name;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1918 sourcing_name = (char_u *)"mappings"; // avoids giving error messages
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1919
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1920 // This this once for each buffer, and then once for global
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1921 // mappings/abbreviations with bp == NULL
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1922 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	1923 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1924 // 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	1925 // 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	1926 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	1927 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	1928 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1929 if (abbr)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1930 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1931 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	1932 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1933 if (bp != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1934 mp = bp->b_first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1935 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1936 mp = first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1937 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1938 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1939 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1940 if (bp != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1941 mp = bp->b_maphash[hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1942 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1943 mp = maphash[hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1944 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1945 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	1946 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1947 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	1948 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1949 if (i == 0)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1950 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	1951 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1952 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	1953 while (*p)
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 (*p == K_SPECIAL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1956 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1957 ++p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1958 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	1959 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1960 buf[0] = p[0];
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1961 buf[1] = p[1];
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1962 buf[2] = NUL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1963 (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	1964 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1965 ++p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1966 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1967 ++p;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1968 }
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 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1972 if (bp == NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1973 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1974 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1975 sourcing_name = save_name;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1976 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1977
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1978 #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	1979 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1980 * 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	1981 * 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	1982 * NULL when no mapping found.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1983 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1984 char_u *
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1985 check_map(
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1986 char_u *keys,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1987 int mode,
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1988 int exact, // require exact match
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1989 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	1990 int abbr, // do abbreviations
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1991 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	1992 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	1993 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1994 int hash;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1995 int len, minlen;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1996 mapblock_T *mp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1997 char_u *s;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1998 int local;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	1999
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2000 validate_maphash();
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 len = (int)STRLEN(keys);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2003 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	2004 // loop over all hash lists
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2005 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	2006 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2007 if (abbr)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2008 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2009 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	2010 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2011 if (local)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2012 mp = curbuf->b_first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2013 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2014 mp = first_abbr;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2015 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2016 else if (local)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2017 mp = curbuf->b_maphash[hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2018 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2019 mp = maphash[hash];
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2020 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	2021 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2022 // 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	2023 // ones
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2024 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	2025 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2026 if (len > mp->m_keylen)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2027 minlen = mp->m_keylen;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2028 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2029 minlen = len;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2030 s = mp->m_keys;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2031 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	2032 && s[2] != NUL)
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 s += 3;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2035 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	2036 minlen = mp->m_keylen - 3;
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 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	2039 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2040 if (mp_ptr != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2041 *mp_ptr = mp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2042 if (local_ptr != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2043 *local_ptr = local;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2044 return mp->m_str;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2045 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2046 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2047 }
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 return NULL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2051 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2052
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2053 void
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2054 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	2055 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2056 char_u *keys;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2057 char_u *which;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2058 char_u buf[NUMBUFLEN];
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2059 char_u *keys_buf = NULL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2060 char_u *rhs;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2061 int mode;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2062 int abbr = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2063 int get_dict = FALSE;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2064 mapblock_T *mp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2065 int buffer_local;
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 // return empty string for failure
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2068 rettv->v_type = VAR_STRING;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2069 rettv->vval.v_string = NULL;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2070
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2071 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	2072 if (*keys == NUL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2073 return;
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 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	2076 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2077 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	2078 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	2079 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2080 abbr = (int)tv_get_number(&argvars[2]);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2081 if (argvars[3].v_type != VAR_UNKNOWN)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2082 get_dict = (int)tv_get_number(&argvars[3]);
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 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2085 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2086 which = (char_u *)"";
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2087 if (which == NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2088 return;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2089
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2090 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	2091
18301 506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	2092 keys = replace_termcodes(keys, &keys_buf,
506bf60a30a0 patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled Bram Moolenaar <Bram@vim.org> parents: 17946 diff changeset	2093 REPTERM_FROM_PART \| REPTERM_DO_LT, NULL);
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2094 rhs = check_map(keys, mode, exact, FALSE, abbr, &mp, &buffer_local);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2095 vim_free(keys_buf);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2096
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2097 if (!get_dict)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2098 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2099 // Return a string.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2100 if (rhs != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2101 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2102 if (*rhs == NUL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2103 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	2104 else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2105 rettv->vval.v_string = str2special_save(rhs, FALSE);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2106 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2107
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2108 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2109 else if (rettv_dict_alloc(rettv) != FAIL && rhs != NULL)
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 // Return a dictionary.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2112 char_u *lhs = str2special_save(mp->m_keys, TRUE);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2113 char_u *mapmode = 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	2114 dict_T *dict = rettv->vval.v_dict;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2115
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2116 dict_add_string(dict, "lhs", lhs);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2117 dict_add_string(dict, "rhs", mp->m_orig_str);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2118 dict_add_number(dict, "noremap", mp->m_noremap ? 1L : 0L);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2119 dict_add_number(dict, "expr", mp->m_expr ? 1L : 0L);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2120 dict_add_number(dict, "silent", mp->m_silent ? 1L : 0L);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2121 dict_add_number(dict, "sid", (long)mp->m_script_ctx.sc_sid);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2122 dict_add_number(dict, "lnum", (long)mp->m_script_ctx.sc_lnum);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2123 dict_add_number(dict, "buffer", (long)buffer_local);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2124 dict_add_number(dict, "nowait", mp->m_nowait ? 1L : 0L);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2125 dict_add_string(dict, "mode", mapmode);
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 vim_free(lhs);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2128 vim_free(mapmode);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2129 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2130 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2131 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2132
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2133 #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	2134
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2135 # define VIS_SEL (VISUAL+SELECTMODE) // abbreviation
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2136
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2137 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2138 * 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	2139 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2140 struct initmap
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2141 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2142 char_u *arg;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2143 int mode;
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
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2146 # ifdef FEAT_GUI_MSWIN
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2147 // 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	2148 static struct initmap initmappings[] =
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 // paste, copy and cut
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2151 {(char_u )"<S-Insert> \"P", NORMAL},
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2152 {(char_u )"<S-Insert> \"-d\"P", VIS_SEL},
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2153 {(char_u )"<S-Insert> <C-R><C-O>", INSERT+CMDLINE},
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2154 {(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	2155 {(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	2156 {(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	2157 {(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	2158 // 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	2159 };
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2160 # endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2161
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2162 # 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	2163 // 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	2164 static struct initmap cinitmappings[] =
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 {(char_u *)"\316w <C-Home>", NORMAL+VIS_SEL},
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2167 {(char_u *)"\316w <C-Home>", INSERT+CMDLINE},
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2168 {(char_u *)"\316u <C-End>", NORMAL+VIS_SEL},
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2169 {(char_u *)"\316u <C-End>", INSERT+CMDLINE},
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2170
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2171 // paste, copy and cut
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2172 # ifdef FEAT_CLIPBOARD
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2173 {(char_u )"\316\324 \"P", NORMAL}, // SHIFT-Insert is "*P
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2174 {(char_u )"\316\324 \"-d\"P", VIS_SEL}, // SHIFT-Insert is "-d"*P
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2175 {(char_u )"\316\324 \022\017", INSERT}, // SHIFT-Insert is ^R^O*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2176 {(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	2177 {(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	2178 {(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	2179 {(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	2180 # else
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2181 {(char_u *)"\316\324 P", NORMAL}, // SHIFT-Insert is P
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2182 {(char_u *)"\316\324 \"-dP", VIS_SEL}, // SHIFT-Insert is "-dP
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2183 {(char_u *)"\316\324 \022\017\"", INSERT}, // SHIFT-Insert is ^R^O"
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2184 {(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	2185 {(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	2186 {(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	2187 # endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2188 };
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2189 # endif
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 # if defined(MACOS_X)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2192 static struct initmap initmappings[] =
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2193 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2194 // Use the Standard MacOS binding.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2195 // paste, copy and cut
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2196 {(char_u )"<D-v> \"P", NORMAL},
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2197 {(char_u )"<D-v> \"-d\"P", VIS_SEL},
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2198 {(char_u )"<D-v> <C-R>", INSERT+CMDLINE},
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2199 {(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	2200 {(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	2201 {(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	2202 };
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2203 # endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2204
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2205 # undef VIS_SEL
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2206 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2207
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2208 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2209 * Set up default mappings.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2210 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2211 void
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2212 init_mappings(void)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2213 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2214 #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	2215 int i;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2216
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2217 # 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	2218 # ifdef VIMDLL
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2219 if (!gui.starting)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2220 # endif
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 for (i = 0;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2223 i < (int)(sizeof(cinitmappings) / sizeof(struct initmap)); ++i)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2224 add_map(cinitmappings[i].arg, cinitmappings[i].mode);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2225 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2226 # endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2227 # if defined(FEAT_GUI_MSWIN) \|\| defined(MACOS_X)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2228 for (i = 0; i < (int)(sizeof(initmappings) / sizeof(struct initmap)); ++i)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2229 add_map(initmappings[i].arg, initmappings[i].mode);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2230 # endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2231 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2232 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2233
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2234 #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	2235 \|\| defined(PROTO)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2236 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2237 * Add a mapping "map" for mode "mode".
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2238 * 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	2239 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2240 void
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2241 add_map(char_u *map, int mode)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2242 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2243 char_u *s;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2244 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	2245
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2246 p_cpo = (char_u *)""; // Allow <> notation
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2247 s = vim_strsave(map);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2248 if (s != NULL)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2249 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2250 (void)do_map(0, s, mode, FALSE);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2251 vim_free(s);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2252 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2253 p_cpo = cpo_save;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2254 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2255 #endif
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2256
17940 079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2257 #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	2258 /*
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2259 * 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	2260 * 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	2261 * 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	2262 * 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	2263 * 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	2264 *
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2265 * 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	2266 * commands.
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2267 * 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	2268 * 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	2269 *
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2270 * 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	2271 */
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2272 typedef struct
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2273 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2274 int from;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2275 int to;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2276 } 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	2277
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2278 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	2279
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2280 /*
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2281 * 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	2282 * 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	2283 */
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2284 static void
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2285 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	2286 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2287 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	2288 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	2289 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	2290
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2291 // 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	2292 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	2293 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2294 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	2295 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	2296
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2297 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	2298 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2299 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	2300 return;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2301 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2302 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	2303 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	2304 else
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2305 b = i;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2306 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2307
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2308 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	2309 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	2310
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2311 // 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	2312 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	2313 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	2314 (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	2315 ++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	2316 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	2317 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	2318 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2319
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2320 /*
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2321 * 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	2322 */
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2323 int
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2324 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	2325 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2326 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	2327 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	2328 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	2329
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2330 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	2331 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2332 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	2333 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	2334
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2335 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	2336 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	2337 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	2338 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	2339 else
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2340 b = i;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2341 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2342 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	2343 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2344
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2345 void
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2346 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	2347 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2348 int i;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2349
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2350 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	2351 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	2352 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	2353 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2354
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2355 /*
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2356 * 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	2357 * 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	2358 */
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2359 void
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2360 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	2361 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2362 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	2363 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	2364 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	2365
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2366 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	2367 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	2368
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2369 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	2370 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2371 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	2372 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	2373 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2374 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	2375 ++p2;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2376 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2377 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	2378 ++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	2379 else
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2380 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	2381 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	2382 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2383 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	2384 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2385 ++p;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2386 break;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2387 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2388 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	2389 ++p;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2390 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	2391 to = NUL;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2392 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	2393 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2394 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	2395 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	2396 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2397 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	2398 ++p;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2399 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	2400 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2401 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2402 else
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2403 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2404 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	2405 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2406 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	2407 ++p2;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2408 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	2409 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2410 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2411 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	2412 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2413 semsg(_("E357: 'langmap': Matching character missing for %s"),
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2414 transchar(from));
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2415 return;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2416 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2417
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2418 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	2419 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	2420 else
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2421 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	2422
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2423 // 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	2424 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	2425 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	2426 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2427 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	2428 if (*p == ';')
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2429 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2430 p = p2;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2431 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	2432 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2433 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	2434 {
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2435 semsg(_("E358: 'langmap': Extra characters after semicolon: %s"), p);
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2436 return;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2437 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2438 ++p;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2439 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2440 break;
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2441 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2442 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2443 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2444 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2445 }
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2446 #endif
079e10a49ea1 patch 8.1.1966: some code in options.c fits better elsewhere Bram Moolenaar <Bram@vim.org> parents: 17781 diff changeset	2447
17576 97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2448 static void
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2449 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	2450 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2451 int mode;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2452 char_u *cmdp;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2453
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2454 cmdp = eap->cmd;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2455 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	2456
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2457 switch (do_map((cmdp == 'n') ? 2 : (cmdp == 'u'),
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2458 eap->arg, mode, isabbrev))
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2459 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2460 case 1: emsg(_(e_invarg));
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2461 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2462 case 2: emsg((isabbrev ? _(e_noabbr) : _(e_nomap)));
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2463 break;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2464 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2465 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2466
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2467 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2468 * ":abbreviate" and friends.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2469 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2470 void
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2471 ex_abbreviate(exarg_T *eap)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2472 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2473 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	2474 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2475
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2476 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2477 * ":map" and friends.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2478 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2479 void
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2480 ex_map(exarg_T *eap)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2481 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2482 // 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	2483 // 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	2484 if (secure)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2485 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2486 secure = 2;
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2487 msg_outtrans(eap->cmd);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2488 msg_putchar('\n');
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2489 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2490 do_exmap(eap, FALSE);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2491 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2492
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2493 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2494 * ":unmap" and friends.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2495 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2496 void
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2497 ex_unmap(exarg_T *eap)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2498 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2499 do_exmap(eap, FALSE);
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2500 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2501
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2502 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2503 * ":mapclear" and friends.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2504 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2505 void
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2506 ex_mapclear(exarg_T *eap)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2507 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2508 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	2509 }
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2510
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2511 /*
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2512 * ":abclear" and friends.
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2513 */
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2514 void
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2515 ex_abclear(exarg_T *eap)
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2516 {
97a750e8707f patch 8.1.1785: map functionality mixed with character input Bram Moolenaar <Bram@vim.org> parents: diff changeset	2517 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	2518 }

Mercurial > vim

annotate src/map.c @ 18301:506bf60a30a0 v8.1.2145