CoCalc -- map.c

GitHub Repository: freebsd/freebsd-src
Path: blob/main/contrib/libedit/map.c
³⁹⁴⁷⁵ views
1
/*	$NetBSD: map.c,v 1.56 2025/01/03 00:40:08 rillig Exp $	*/
2

3
/*-
4
 * Copyright (c) 1992, 1993
5
 *	The Regents of the University of California.  All rights reserved.
6
 *
7
 * This code is derived from software contributed to Berkeley by
8
 * Christos Zoulas of Cornell University.
9
 *
10
 * Redistribution and use in source and binary forms, with or without
11
 * modification, are permitted provided that the following conditions
12
 * are met:
13
 * 1. Redistributions of source code must retain the above copyright
14
 *    notice, this list of conditions and the following disclaimer.
15
 * 2. Redistributions in binary form must reproduce the above copyright
16
 *    notice, this list of conditions and the following disclaimer in the
17
 *    documentation and/or other materials provided with the distribution.
18
 * 3. Neither the name of the University nor the names of its contributors
19
 *    may be used to endorse or promote products derived from this software
20
 *    without specific prior written permission.
21
 *
22
 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
23
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
26
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32
 * SUCH DAMAGE.
33
 */
34

35
#include "config.h"
36
#if !defined(lint) && !defined(SCCSID)
37
#if 0
38
static char sccsid[] = "@(#)map.c	8.1 (Berkeley) 6/4/93";
39
#else
40
__RCSID("$NetBSD: map.c,v 1.56 2025/01/03 00:40:08 rillig Exp $");
41
#endif
42
#endif /* not lint && not SCCSID */
43

44
/*
45
 * map.c: Editor function definitions
46
 */
47
#include <ctype.h>
48
#include <stdlib.h>
49
#include <string.h>
50

51
#include "el.h"
52
#include "common.h"
53
#include "emacs.h"
54
#include "vi.h"
55
#include "fcns.h"
56
#include "func.h"
57
#include "help.h"
58
#include "parse.h"
59

60
static void	map_print_key(EditLine *, el_action_t *, const wchar_t *);
61
static void	map_print_some_keys(EditLine *, el_action_t *, wint_t, wint_t);
62
static void	map_print_all_keys(EditLine *);
63
static void	map_init_nls(EditLine *);
64
static void	map_init_meta(EditLine *);
65

66
/* keymap tables ; should be N_KEYS*sizeof(KEYCMD) bytes long */
67

68

69
static const el_action_t  el_map_emacs[] = {
70
	/*   0 */	EM_SET_MARK,		/* ^@ */
71
	/*   1 */	ED_MOVE_TO_BEG,		/* ^A */
72
	/*   2 */	ED_PREV_CHAR,		/* ^B */
73
	/*   3 */	ED_IGNORE,		/* ^C */
74
	/*   4 */	EM_DELETE_OR_LIST,	/* ^D */
75
	/*   5 */	ED_MOVE_TO_END,		/* ^E */
76
	/*   6 */	ED_NEXT_CHAR,		/* ^F */
77
	/*   7 */	ED_UNASSIGNED,		/* ^G */
78
	/*   8 */	EM_DELETE_PREV_CHAR,	/* ^H */
79
	/*   9 */	ED_UNASSIGNED,		/* ^I */
80
	/*  10 */	ED_NEWLINE,		/* ^J */
81
	/*  11 */	ED_KILL_LINE,		/* ^K */
82
	/*  12 */	ED_CLEAR_SCREEN,	/* ^L */
83
	/*  13 */	ED_NEWLINE,		/* ^M */
84
	/*  14 */	ED_NEXT_HISTORY,	/* ^N */
85
	/*  15 */	ED_IGNORE,		/* ^O */
86
	/*  16 */	ED_PREV_HISTORY,	/* ^P */
87
	/*  17 */	ED_IGNORE,		/* ^Q */
88
	/*  18 */	EM_INC_SEARCH_PREV,	/* ^R */
89
	/*  19 */	ED_IGNORE,		/* ^S */
90
	/*  20 */	ED_TRANSPOSE_CHARS,	/* ^T */
91
	/*  21 */	EM_KILL_LINE,		/* ^U */
92
	/*  22 */	ED_QUOTED_INSERT,	/* ^V */
93
	/*  23 */	ED_DELETE_PREV_WORD,	/* ^W */
94
	/*  24 */	ED_SEQUENCE_LEAD_IN,	/* ^X */
95
	/*  25 */	EM_YANK,		/* ^Y */
96
	/*  26 */	ED_IGNORE,		/* ^Z */
97
	/*  27 */	EM_META_NEXT,		/* ^[ */
98
	/*  28 */	ED_IGNORE,		/* ^\ */
99
	/*  29 */	ED_IGNORE,		/* ^] */
100
	/*  30 */	ED_UNASSIGNED,		/* ^^ */
101
	/*  31 */	ED_UNASSIGNED,		/* ^_ */
102
	/*  32 */	ED_INSERT,		/* SPACE */
103
	/*  33 */	ED_INSERT,		/* ! */
104
	/*  34 */	ED_INSERT,		/* " */
105
	/*  35 */	ED_INSERT,		/* # */
106
	/*  36 */	ED_INSERT,		/* $ */
107
	/*  37 */	ED_INSERT,		/* % */
108
	/*  38 */	ED_INSERT,		/* & */
109
	/*  39 */	ED_INSERT,		/* ' */
110
	/*  40 */	ED_INSERT,		/* ( */
111
	/*  41 */	ED_INSERT,		/* ) */
112
	/*  42 */	ED_INSERT,		/* * */
113
	/*  43 */	ED_INSERT,		/* + */
114
	/*  44 */	ED_INSERT,		/* , */
115
	/*  45 */	ED_INSERT,		/* - */
116
	/*  46 */	ED_INSERT,		/* . */
117
	/*  47 */	ED_INSERT,		/* / */
118
	/*  48 */	ED_DIGIT,		/* 0 */
119
	/*  49 */	ED_DIGIT,		/* 1 */
120
	/*  50 */	ED_DIGIT,		/* 2 */
121
	/*  51 */	ED_DIGIT,		/* 3 */
122
	/*  52 */	ED_DIGIT,		/* 4 */
123
	/*  53 */	ED_DIGIT,		/* 5 */
124
	/*  54 */	ED_DIGIT,		/* 6 */
125
	/*  55 */	ED_DIGIT,		/* 7 */
126
	/*  56 */	ED_DIGIT,		/* 8 */
127
	/*  57 */	ED_DIGIT,		/* 9 */
128
	/*  58 */	ED_INSERT,		/* : */
129
	/*  59 */	ED_INSERT,		/* ; */
130
	/*  60 */	ED_INSERT,		/* < */
131
	/*  61 */	ED_INSERT,		/* = */
132
	/*  62 */	ED_INSERT,		/* > */
133
	/*  63 */	ED_INSERT,		/* ? */
134
	/*  64 */	ED_INSERT,		/* @ */
135
	/*  65 */	ED_INSERT,		/* A */
136
	/*  66 */	ED_INSERT,		/* B */
137
	/*  67 */	ED_INSERT,		/* C */
138
	/*  68 */	ED_INSERT,		/* D */
139
	/*  69 */	ED_INSERT,		/* E */
140
	/*  70 */	ED_INSERT,		/* F */
141
	/*  71 */	ED_INSERT,		/* G */
142
	/*  72 */	ED_INSERT,		/* H */
143
	/*  73 */	ED_INSERT,		/* I */
144
	/*  74 */	ED_INSERT,		/* J */
145
	/*  75 */	ED_INSERT,		/* K */
146
	/*  76 */	ED_INSERT,		/* L */
147
	/*  77 */	ED_INSERT,		/* M */
148
	/*  78 */	ED_INSERT,		/* N */
149
	/*  79 */	ED_INSERT,		/* O */
150
	/*  80 */	ED_INSERT,		/* P */
151
	/*  81 */	ED_INSERT,		/* Q */
152
	/*  82 */	ED_INSERT,		/* R */
153
	/*  83 */	ED_INSERT,		/* S */
154
	/*  84 */	ED_INSERT,		/* T */
155
	/*  85 */	ED_INSERT,		/* U */
156
	/*  86 */	ED_INSERT,		/* V */
157
	/*  87 */	ED_INSERT,		/* W */
158
	/*  88 */	ED_INSERT,		/* X */
159
	/*  89 */	ED_INSERT,		/* Y */
160
	/*  90 */	ED_INSERT,		/* Z */
161
	/*  91 */	ED_INSERT,		/* [ */
162
	/*  92 */	ED_INSERT,		/* \ */
163
	/*  93 */	ED_INSERT,		/* ] */
164
	/*  94 */	ED_INSERT,		/* ^ */
165
	/*  95 */	ED_INSERT,		/* _ */
166
	/*  96 */	ED_INSERT,		/* ` */
167
	/*  97 */	ED_INSERT,		/* a */
168
	/*  98 */	ED_INSERT,		/* b */
169
	/*  99 */	ED_INSERT,		/* c */
170
	/* 100 */	ED_INSERT,		/* d */
171
	/* 101 */	ED_INSERT,		/* e */
172
	/* 102 */	ED_INSERT,		/* f */
173
	/* 103 */	ED_INSERT,		/* g */
174
	/* 104 */	ED_INSERT,		/* h */
175
	/* 105 */	ED_INSERT,		/* i */
176
	/* 106 */	ED_INSERT,		/* j */
177
	/* 107 */	ED_INSERT,		/* k */
178
	/* 108 */	ED_INSERT,		/* l */
179
	/* 109 */	ED_INSERT,		/* m */
180
	/* 110 */	ED_INSERT,		/* n */
181
	/* 111 */	ED_INSERT,		/* o */
182
	/* 112 */	ED_INSERT,		/* p */
183
	/* 113 */	ED_INSERT,		/* q */
184
	/* 114 */	ED_INSERT,		/* r */
185
	/* 115 */	ED_INSERT,		/* s */
186
	/* 116 */	ED_INSERT,		/* t */
187
	/* 117 */	ED_INSERT,		/* u */
188
	/* 118 */	ED_INSERT,		/* v */
189
	/* 119 */	ED_INSERT,		/* w */
190
	/* 120 */	ED_INSERT,		/* x */
191
	/* 121 */	ED_INSERT,		/* y */
192
	/* 122 */	ED_INSERT,		/* z */
193
	/* 123 */	ED_INSERT,		/* { */
194
	/* 124 */	ED_INSERT,		/* | */
195
	/* 125 */	ED_INSERT,		/* } */
196
	/* 126 */	ED_INSERT,		/* ~ */
197
	/* 127 */	EM_DELETE_PREV_CHAR,	/* ^? */
198
	/* 128 */	ED_UNASSIGNED,		/* M-^@ */
199
	/* 129 */	ED_UNASSIGNED,		/* M-^A */
200
	/* 130 */	ED_UNASSIGNED,		/* M-^B */
201
	/* 131 */	ED_UNASSIGNED,		/* M-^C */
202
	/* 132 */	ED_UNASSIGNED,		/* M-^D */
203
	/* 133 */	ED_UNASSIGNED,		/* M-^E */
204
	/* 134 */	ED_UNASSIGNED,		/* M-^F */
205
	/* 135 */	ED_UNASSIGNED,		/* M-^G */
206
	/* 136 */	ED_DELETE_PREV_WORD,	/* M-^H */
207
	/* 137 */	ED_UNASSIGNED,		/* M-^I */
208
	/* 138 */	ED_UNASSIGNED,		/* M-^J */
209
	/* 139 */	ED_UNASSIGNED,		/* M-^K */
210
	/* 140 */	ED_CLEAR_SCREEN,	/* M-^L */
211
	/* 141 */	ED_UNASSIGNED,		/* M-^M */
212
	/* 142 */	ED_UNASSIGNED,		/* M-^N */
213
	/* 143 */	ED_UNASSIGNED,		/* M-^O */
214
	/* 144 */	ED_UNASSIGNED,		/* M-^P */
215
	/* 145 */	ED_UNASSIGNED,		/* M-^Q */
216
	/* 146 */	ED_UNASSIGNED,		/* M-^R */
217
	/* 147 */	ED_UNASSIGNED,		/* M-^S */
218
	/* 148 */	ED_UNASSIGNED,		/* M-^T */
219
	/* 149 */	ED_UNASSIGNED,		/* M-^U */
220
	/* 150 */	ED_UNASSIGNED,		/* M-^V */
221
	/* 151 */	ED_UNASSIGNED,		/* M-^W */
222
	/* 152 */	ED_UNASSIGNED,		/* M-^X */
223
	/* 153 */	ED_UNASSIGNED,		/* M-^Y */
224
	/* 154 */	ED_UNASSIGNED,		/* M-^Z */
225
	/* 155 */	ED_UNASSIGNED,		/* M-^[ */
226
	/* 156 */	ED_UNASSIGNED,		/* M-^\ */
227
	/* 157 */	ED_UNASSIGNED,		/* M-^] */
228
	/* 158 */	ED_UNASSIGNED,		/* M-^^ */
229
	/* 159 */	EM_COPY_PREV_WORD,	/* M-^_ */
230
	/* 160 */	ED_UNASSIGNED,		/* M-SPACE */
231
	/* 161 */	ED_UNASSIGNED,		/* M-! */
232
	/* 162 */	ED_UNASSIGNED,		/* M-" */
233
	/* 163 */	ED_UNASSIGNED,		/* M-# */
234
	/* 164 */	ED_UNASSIGNED,		/* M-$ */
235
	/* 165 */	ED_UNASSIGNED,		/* M-% */
236
	/* 166 */	ED_UNASSIGNED,		/* M-& */
237
	/* 167 */	ED_UNASSIGNED,		/* M-' */
238
	/* 168 */	ED_UNASSIGNED,		/* M-( */
239
	/* 169 */	ED_UNASSIGNED,		/* M-) */
240
	/* 170 */	ED_UNASSIGNED,		/* M-* */
241
	/* 171 */	ED_UNASSIGNED,		/* M-+ */
242
	/* 172 */	ED_UNASSIGNED,		/* M-, */
243
	/* 173 */	ED_UNASSIGNED,		/* M-- */
244
	/* 174 */	ED_UNASSIGNED,		/* M-. */
245
	/* 175 */	ED_UNASSIGNED,		/* M-/ */
246
	/* 176 */	ED_ARGUMENT_DIGIT,	/* M-0 */
247
	/* 177 */	ED_ARGUMENT_DIGIT,	/* M-1 */
248
	/* 178 */	ED_ARGUMENT_DIGIT,	/* M-2 */
249
	/* 179 */	ED_ARGUMENT_DIGIT,	/* M-3 */
250
	/* 180 */	ED_ARGUMENT_DIGIT,	/* M-4 */
251
	/* 181 */	ED_ARGUMENT_DIGIT,	/* M-5 */
252
	/* 182 */	ED_ARGUMENT_DIGIT,	/* M-6 */
253
	/* 183 */	ED_ARGUMENT_DIGIT,	/* M-7 */
254
	/* 184 */	ED_ARGUMENT_DIGIT,	/* M-8 */
255
	/* 185 */	ED_ARGUMENT_DIGIT,	/* M-9 */
256
	/* 186 */	ED_UNASSIGNED,		/* M-: */
257
	/* 187 */	ED_UNASSIGNED,		/* M-; */
258
	/* 188 */	ED_UNASSIGNED,		/* M-< */
259
	/* 189 */	ED_UNASSIGNED,		/* M-= */
260
	/* 190 */	ED_UNASSIGNED,		/* M-> */
261
	/* 191 */	ED_UNASSIGNED,		/* M-? */
262
	/* 192 */	ED_UNASSIGNED,		/* M-@ */
263
	/* 193 */	ED_UNASSIGNED,		/* M-A */
264
	/* 194 */	ED_PREV_WORD,		/* M-B */
265
	/* 195 */	EM_CAPITOL_CASE,	/* M-C */
266
	/* 196 */	EM_DELETE_NEXT_WORD,	/* M-D */
267
	/* 197 */	ED_UNASSIGNED,		/* M-E */
268
	/* 198 */	EM_NEXT_WORD,		/* M-F */
269
	/* 199 */	ED_UNASSIGNED,		/* M-G */
270
	/* 200 */	ED_UNASSIGNED,		/* M-H */
271
	/* 201 */	ED_UNASSIGNED,		/* M-I */
272
	/* 202 */	ED_UNASSIGNED,		/* M-J */
273
	/* 203 */	ED_UNASSIGNED,		/* M-K */
274
	/* 204 */	EM_LOWER_CASE,		/* M-L */
275
	/* 205 */	ED_UNASSIGNED,		/* M-M */
276
	/* 206 */	ED_SEARCH_NEXT_HISTORY,	/* M-N */
277
	/* 207 */	ED_SEQUENCE_LEAD_IN,	/* M-O */
278
	/* 208 */	ED_SEARCH_PREV_HISTORY,	/* M-P */
279
	/* 209 */	ED_UNASSIGNED,		/* M-Q */
280
	/* 210 */	ED_UNASSIGNED,		/* M-R */
281
	/* 211 */	ED_UNASSIGNED,		/* M-S */
282
	/* 212 */	ED_UNASSIGNED,		/* M-T */
283
	/* 213 */	EM_UPPER_CASE,		/* M-U */
284
	/* 214 */	ED_UNASSIGNED,		/* M-V */
285
	/* 215 */	EM_COPY_REGION,		/* M-W */
286
	/* 216 */	ED_COMMAND,		/* M-X */
287
	/* 217 */	ED_UNASSIGNED,		/* M-Y */
288
	/* 218 */	ED_UNASSIGNED,		/* M-Z */
289
	/* 219 */	ED_SEQUENCE_LEAD_IN,	/* M-[ */
290
	/* 220 */	ED_UNASSIGNED,		/* M-\ */
291
	/* 221 */	ED_UNASSIGNED,		/* M-] */
292
	/* 222 */	ED_UNASSIGNED,		/* M-^ */
293
	/* 223 */	ED_UNASSIGNED,		/* M-_ */
294
	/* 223 */	ED_UNASSIGNED,		/* M-` */
295
	/* 224 */	ED_UNASSIGNED,		/* M-a */
296
	/* 225 */	ED_PREV_WORD,		/* M-b */
297
	/* 226 */	EM_CAPITOL_CASE,	/* M-c */
298
	/* 227 */	EM_DELETE_NEXT_WORD,	/* M-d */
299
	/* 228 */	ED_UNASSIGNED,		/* M-e */
300
	/* 229 */	EM_NEXT_WORD,		/* M-f */
301
	/* 230 */	ED_UNASSIGNED,		/* M-g */
302
	/* 231 */	ED_UNASSIGNED,		/* M-h */
303
	/* 232 */	ED_UNASSIGNED,		/* M-i */
304
	/* 233 */	ED_UNASSIGNED,		/* M-j */
305
	/* 234 */	ED_UNASSIGNED,		/* M-k */
306
	/* 235 */	EM_LOWER_CASE,		/* M-l */
307
	/* 236 */	ED_UNASSIGNED,		/* M-m */
308
	/* 237 */	ED_SEARCH_NEXT_HISTORY,	/* M-n */
309
	/* 238 */	ED_UNASSIGNED,		/* M-o */
310
	/* 239 */	ED_SEARCH_PREV_HISTORY,	/* M-p */
311
	/* 240 */	ED_UNASSIGNED,		/* M-q */
312
	/* 241 */	ED_UNASSIGNED,		/* M-r */
313
	/* 242 */	ED_UNASSIGNED,		/* M-s */
314
	/* 243 */	ED_UNASSIGNED,		/* M-t */
315
	/* 244 */	EM_UPPER_CASE,		/* M-u */
316
	/* 245 */	ED_UNASSIGNED,		/* M-v */
317
	/* 246 */	EM_COPY_REGION,		/* M-w */
318
	/* 247 */	ED_COMMAND,		/* M-x */
319
	/* 248 */	ED_UNASSIGNED,		/* M-y */
320
	/* 249 */	ED_UNASSIGNED,		/* M-z */
321
	/* 250 */	ED_UNASSIGNED,		/* M-{ */
322
	/* 251 */	ED_UNASSIGNED,		/* M-| */
323
	/* 252 */	ED_UNASSIGNED,		/* M-} */
324
	/* 253 */	ED_UNASSIGNED,		/* M-~ */
325
	/* 254 */	ED_DELETE_PREV_WORD	/* M-^? */
326
	/* 255 */
327
};
328

329

330
/*
331
 * keymap table for vi.  Each index into above tbl; should be
332
 * N_KEYS entries long.  Vi mode uses a sticky-extend to do command mode:
333
 * insert mode characters are in the normal keymap, and command mode
334
 * in the extended keymap.
335
 */
336
static const el_action_t  el_map_vi_insert[] = {
337
#ifdef KSHVI
338
	/*   0 */	ED_UNASSIGNED,		/* ^@ */
339
	/*   1 */	ED_INSERT,		/* ^A */
340
	/*   2 */	ED_INSERT,		/* ^B */
341
	/*   3 */	ED_INSERT,		/* ^C */
342
	/*   4 */	VI_LIST_OR_EOF,		/* ^D */
343
	/*   5 */	ED_INSERT,		/* ^E */
344
	/*   6 */	ED_INSERT,		/* ^F */
345
	/*   7 */	ED_INSERT,		/* ^G */
346
	/*   8 */	VI_DELETE_PREV_CHAR,	/* ^H */   /* BackSpace key */
347
	/*   9 */	ED_INSERT,		/* ^I */   /* Tab Key  */
348
	/*  10 */	ED_NEWLINE,		/* ^J */
349
	/*  11 */	ED_INSERT,		/* ^K */
350
	/*  12 */	ED_INSERT,		/* ^L */
351
	/*  13 */	ED_NEWLINE,		/* ^M */
352
	/*  14 */	ED_INSERT,		/* ^N */
353
	/*  15 */	ED_INSERT,		/* ^O */
354
	/*  16 */	ED_INSERT,		/* ^P */
355
	/*  17 */	ED_IGNORE,		/* ^Q */
356
	/*  18 */	ED_INSERT,		/* ^R */
357
	/*  19 */	ED_IGNORE,		/* ^S */
358
	/*  20 */	ED_INSERT,		/* ^T */
359
	/*  21 */	VI_KILL_LINE_PREV,	/* ^U */
360
	/*  22 */	ED_QUOTED_INSERT,	/* ^V */
361
	/*  23 */	ED_DELETE_PREV_WORD,	/* ^W */
362
		/* ED_DELETE_PREV_WORD: Only until strt edit pos */
363
	/*  24 */	ED_INSERT,		/* ^X */
364
	/*  25 */	ED_INSERT,		/* ^Y */
365
	/*  26 */	ED_INSERT,		/* ^Z */
366
	/*  27 */	VI_COMMAND_MODE,	/* ^[ */  /* [ Esc ] key */
367
	/*  28 */	ED_IGNORE,		/* ^\ */
368
	/*  29 */	ED_INSERT,		/* ^] */
369
	/*  30 */	ED_INSERT,		/* ^^ */
370
	/*  31 */	ED_INSERT,		/* ^_ */
371
#else /* !KSHVI */
372
				/*
373
				 * NOTE: These mappings do NOT Correspond well
374
				 * to the KSH VI editing assignments.
375
				 * On the other and they are convenient and
376
				 * many people have have gotten used to them.
377
				 */
378
	/*   0 */	ED_UNASSIGNED,		/* ^@ */
379
	/*   1 */	ED_MOVE_TO_BEG,		/* ^A */
380
	/*   2 */	ED_PREV_CHAR,		/* ^B */
381
	/*   3 */	ED_IGNORE,		/* ^C */
382
	/*   4 */	VI_LIST_OR_EOF,		/* ^D */
383
	/*   5 */	ED_MOVE_TO_END,		/* ^E */
384
	/*   6 */	ED_NEXT_CHAR,		/* ^F */
385
	/*   7 */	ED_UNASSIGNED,		/* ^G */
386
	/*   8 */	VI_DELETE_PREV_CHAR,	/* ^H */   /* BackSpace key */
387
	/*   9 */	ED_UNASSIGNED,		/* ^I */   /* Tab Key */
388
	/*  10 */	ED_NEWLINE,		/* ^J */
389
	/*  11 */	ED_KILL_LINE,		/* ^K */
390
	/*  12 */	ED_CLEAR_SCREEN,	/* ^L */
391
	/*  13 */	ED_NEWLINE,		/* ^M */
392
	/*  14 */	ED_NEXT_HISTORY,	/* ^N */
393
	/*  15 */	ED_IGNORE,		/* ^O */
394
	/*  16 */	ED_PREV_HISTORY,	/* ^P */
395
	/*  17 */	ED_IGNORE,		/* ^Q */
396
	/*  18 */	ED_REDISPLAY,		/* ^R */
397
	/*  19 */	ED_IGNORE,		/* ^S */
398
	/*  20 */	ED_TRANSPOSE_CHARS,	/* ^T */
399
	/*  21 */	VI_KILL_LINE_PREV,	/* ^U */
400
	/*  22 */	ED_QUOTED_INSERT,	/* ^V */
401
	/*  23 */	ED_DELETE_PREV_WORD,	/* ^W */
402
	/*  24 */	ED_UNASSIGNED,		/* ^X */
403
	/*  25 */	ED_IGNORE,		/* ^Y */
404
	/*  26 */	ED_IGNORE,		/* ^Z */
405
	/*  27 */	VI_COMMAND_MODE,	/* ^[ */
406
	/*  28 */	ED_IGNORE,		/* ^\ */
407
	/*  29 */	ED_UNASSIGNED,		/* ^] */
408
	/*  30 */	ED_UNASSIGNED,		/* ^^ */
409
	/*  31 */	ED_UNASSIGNED,		/* ^_ */
410
#endif  /* KSHVI */
411
	/*  32 */	ED_INSERT,		/* SPACE */
412
	/*  33 */	ED_INSERT,		/* ! */
413
	/*  34 */	ED_INSERT,		/* " */
414
	/*  35 */	ED_INSERT,		/* # */
415
	/*  36 */	ED_INSERT,		/* $ */
416
	/*  37 */	ED_INSERT,		/* % */
417
	/*  38 */	ED_INSERT,		/* & */
418
	/*  39 */	ED_INSERT,		/* ' */
419
	/*  40 */	ED_INSERT,		/* ( */
420
	/*  41 */	ED_INSERT,		/* ) */
421
	/*  42 */	ED_INSERT,		/* * */
422
	/*  43 */	ED_INSERT,		/* + */
423
	/*  44 */	ED_INSERT,		/* , */
424
	/*  45 */	ED_INSERT,		/* - */
425
	/*  46 */	ED_INSERT,		/* . */
426
	/*  47 */	ED_INSERT,		/* / */
427
	/*  48 */	ED_INSERT,		/* 0 */
428
	/*  49 */	ED_INSERT,		/* 1 */
429
	/*  50 */	ED_INSERT,		/* 2 */
430
	/*  51 */	ED_INSERT,		/* 3 */
431
	/*  52 */	ED_INSERT,		/* 4 */
432
	/*  53 */	ED_INSERT,		/* 5 */
433
	/*  54 */	ED_INSERT,		/* 6 */
434
	/*  55 */	ED_INSERT,		/* 7 */
435
	/*  56 */	ED_INSERT,		/* 8 */
436
	/*  57 */	ED_INSERT,		/* 9 */
437
	/*  58 */	ED_INSERT,		/* : */
438
	/*  59 */	ED_INSERT,		/* ; */
439
	/*  60 */	ED_INSERT,		/* < */
440
	/*  61 */	ED_INSERT,		/* = */
441
	/*  62 */	ED_INSERT,		/* > */
442
	/*  63 */	ED_INSERT,		/* ? */
443
	/*  64 */	ED_INSERT,		/* @ */
444
	/*  65 */	ED_INSERT,		/* A */
445
	/*  66 */	ED_INSERT,		/* B */
446
	/*  67 */	ED_INSERT,		/* C */
447
	/*  68 */	ED_INSERT,		/* D */
448
	/*  69 */	ED_INSERT,		/* E */
449
	/*  70 */	ED_INSERT,		/* F */
450
	/*  71 */	ED_INSERT,		/* G */
451
	/*  72 */	ED_INSERT,		/* H */
452
	/*  73 */	ED_INSERT,		/* I */
453
	/*  74 */	ED_INSERT,		/* J */
454
	/*  75 */	ED_INSERT,		/* K */
455
	/*  76 */	ED_INSERT,		/* L */
456
	/*  77 */	ED_INSERT,		/* M */
457
	/*  78 */	ED_INSERT,		/* N */
458
	/*  79 */	ED_INSERT,		/* O */
459
	/*  80 */	ED_INSERT,		/* P */
460
	/*  81 */	ED_INSERT,		/* Q */
461
	/*  82 */	ED_INSERT,		/* R */
462
	/*  83 */	ED_INSERT,		/* S */
463
	/*  84 */	ED_INSERT,		/* T */
464
	/*  85 */	ED_INSERT,		/* U */
465
	/*  86 */	ED_INSERT,		/* V */
466
	/*  87 */	ED_INSERT,		/* W */
467
	/*  88 */	ED_INSERT,		/* X */
468
	/*  89 */	ED_INSERT,		/* Y */
469
	/*  90 */	ED_INSERT,		/* Z */
470
	/*  91 */	ED_INSERT,		/* [ */
471
	/*  92 */	ED_INSERT,		/* \ */
472
	/*  93 */	ED_INSERT,		/* ] */
473
	/*  94 */	ED_INSERT,		/* ^ */
474
	/*  95 */	ED_INSERT,		/* _ */
475
	/*  96 */	ED_INSERT,		/* ` */
476
	/*  97 */	ED_INSERT,		/* a */
477
	/*  98 */	ED_INSERT,		/* b */
478
	/*  99 */	ED_INSERT,		/* c */
479
	/* 100 */	ED_INSERT,		/* d */
480
	/* 101 */	ED_INSERT,		/* e */
481
	/* 102 */	ED_INSERT,		/* f */
482
	/* 103 */	ED_INSERT,		/* g */
483
	/* 104 */	ED_INSERT,		/* h */
484
	/* 105 */	ED_INSERT,		/* i */
485
	/* 106 */	ED_INSERT,		/* j */
486
	/* 107 */	ED_INSERT,		/* k */
487
	/* 108 */	ED_INSERT,		/* l */
488
	/* 109 */	ED_INSERT,		/* m */
489
	/* 110 */	ED_INSERT,		/* n */
490
	/* 111 */	ED_INSERT,		/* o */
491
	/* 112 */	ED_INSERT,		/* p */
492
	/* 113 */	ED_INSERT,		/* q */
493
	/* 114 */	ED_INSERT,		/* r */
494
	/* 115 */	ED_INSERT,		/* s */
495
	/* 116 */	ED_INSERT,		/* t */
496
	/* 117 */	ED_INSERT,		/* u */
497
	/* 118 */	ED_INSERT,		/* v */
498
	/* 119 */	ED_INSERT,		/* w */
499
	/* 120 */	ED_INSERT,		/* x */
500
	/* 121 */	ED_INSERT,		/* y */
501
	/* 122 */	ED_INSERT,		/* z */
502
	/* 123 */	ED_INSERT,		/* { */
503
	/* 124 */	ED_INSERT,		/* | */
504
	/* 125 */	ED_INSERT,		/* } */
505
	/* 126 */	ED_INSERT,		/* ~ */
506
	/* 127 */	VI_DELETE_PREV_CHAR,	/* ^? */
507
	/* 128 */	ED_INSERT,		/* M-^@ */
508
	/* 129 */	ED_INSERT,		/* M-^A */
509
	/* 130 */	ED_INSERT,		/* M-^B */
510
	/* 131 */	ED_INSERT,		/* M-^C */
511
	/* 132 */	ED_INSERT,		/* M-^D */
512
	/* 133 */	ED_INSERT,		/* M-^E */
513
	/* 134 */	ED_INSERT,		/* M-^F */
514
	/* 135 */	ED_INSERT,		/* M-^G */
515
	/* 136 */	ED_INSERT,		/* M-^H */
516
	/* 137 */	ED_INSERT,		/* M-^I */
517
	/* 138 */	ED_INSERT,		/* M-^J */
518
	/* 139 */	ED_INSERT,		/* M-^K */
519
	/* 140 */	ED_INSERT,		/* M-^L */
520
	/* 141 */	ED_INSERT,		/* M-^M */
521
	/* 142 */	ED_INSERT,		/* M-^N */
522
	/* 143 */	ED_INSERT,		/* M-^O */
523
	/* 144 */	ED_INSERT,		/* M-^P */
524
	/* 145 */	ED_INSERT,		/* M-^Q */
525
	/* 146 */	ED_INSERT,		/* M-^R */
526
	/* 147 */	ED_INSERT,		/* M-^S */
527
	/* 148 */	ED_INSERT,		/* M-^T */
528
	/* 149 */	ED_INSERT,		/* M-^U */
529
	/* 150 */	ED_INSERT,		/* M-^V */
530
	/* 151 */	ED_INSERT,		/* M-^W */
531
	/* 152 */	ED_INSERT,		/* M-^X */
532
	/* 153 */	ED_INSERT,		/* M-^Y */
533
	/* 154 */	ED_INSERT,		/* M-^Z */
534
	/* 155 */	ED_INSERT,		/* M-^[ */
535
	/* 156 */	ED_INSERT,		/* M-^\ */
536
	/* 157 */	ED_INSERT,		/* M-^] */
537
	/* 158 */	ED_INSERT,		/* M-^^ */
538
	/* 159 */	ED_INSERT,		/* M-^_ */
539
	/* 160 */	ED_INSERT,		/* M-SPACE */
540
	/* 161 */	ED_INSERT,		/* M-! */
541
	/* 162 */	ED_INSERT,		/* M-" */
542
	/* 163 */	ED_INSERT,		/* M-# */
543
	/* 164 */	ED_INSERT,		/* M-$ */
544
	/* 165 */	ED_INSERT,		/* M-% */
545
	/* 166 */	ED_INSERT,		/* M-& */
546
	/* 167 */	ED_INSERT,		/* M-' */
547
	/* 168 */	ED_INSERT,		/* M-( */
548
	/* 169 */	ED_INSERT,		/* M-) */
549
	/* 170 */	ED_INSERT,		/* M-* */
550
	/* 171 */	ED_INSERT,		/* M-+ */
551
	/* 172 */	ED_INSERT,		/* M-, */
552
	/* 173 */	ED_INSERT,		/* M-- */
553
	/* 174 */	ED_INSERT,		/* M-. */
554
	/* 175 */	ED_INSERT,		/* M-/ */
555
	/* 176 */	ED_INSERT,		/* M-0 */
556
	/* 177 */	ED_INSERT,		/* M-1 */
557
	/* 178 */	ED_INSERT,		/* M-2 */
558
	/* 179 */	ED_INSERT,		/* M-3 */
559
	/* 180 */	ED_INSERT,		/* M-4 */
560
	/* 181 */	ED_INSERT,		/* M-5 */
561
	/* 182 */	ED_INSERT,		/* M-6 */
562
	/* 183 */	ED_INSERT,		/* M-7 */
563
	/* 184 */	ED_INSERT,		/* M-8 */
564
	/* 185 */	ED_INSERT,		/* M-9 */
565
	/* 186 */	ED_INSERT,		/* M-: */
566
	/* 187 */	ED_INSERT,		/* M-; */
567
	/* 188 */	ED_INSERT,		/* M-< */
568
	/* 189 */	ED_INSERT,		/* M-= */
569
	/* 190 */	ED_INSERT,		/* M-> */
570
	/* 191 */	ED_INSERT,		/* M-? */
571
	/* 192 */	ED_INSERT,		/* M-@ */
572
	/* 193 */	ED_INSERT,		/* M-A */
573
	/* 194 */	ED_INSERT,		/* M-B */
574
	/* 195 */	ED_INSERT,		/* M-C */
575
	/* 196 */	ED_INSERT,		/* M-D */
576
	/* 197 */	ED_INSERT,		/* M-E */
577
	/* 198 */	ED_INSERT,		/* M-F */
578
	/* 199 */	ED_INSERT,		/* M-G */
579
	/* 200 */	ED_INSERT,		/* M-H */
580
	/* 201 */	ED_INSERT,		/* M-I */
581
	/* 202 */	ED_INSERT,		/* M-J */
582
	/* 203 */	ED_INSERT,		/* M-K */
583
	/* 204 */	ED_INSERT,		/* M-L */
584
	/* 205 */	ED_INSERT,		/* M-M */
585
	/* 206 */	ED_INSERT,		/* M-N */
586
	/* 207 */	ED_INSERT,		/* M-O */
587
	/* 208 */	ED_INSERT,		/* M-P */
588
	/* 209 */	ED_INSERT,		/* M-Q */
589
	/* 210 */	ED_INSERT,		/* M-R */
590
	/* 211 */	ED_INSERT,		/* M-S */
591
	/* 212 */	ED_INSERT,		/* M-T */
592
	/* 213 */	ED_INSERT,		/* M-U */
593
	/* 214 */	ED_INSERT,		/* M-V */
594
	/* 215 */	ED_INSERT,		/* M-W */
595
	/* 216 */	ED_INSERT,		/* M-X */
596
	/* 217 */	ED_INSERT,		/* M-Y */
597
	/* 218 */	ED_INSERT,		/* M-Z */
598
	/* 219 */	ED_INSERT,		/* M-[ */
599
	/* 220 */	ED_INSERT,		/* M-\ */
600
	/* 221 */	ED_INSERT,		/* M-] */
601
	/* 222 */	ED_INSERT,		/* M-^ */
602
	/* 223 */	ED_INSERT,		/* M-_ */
603
	/* 224 */	ED_INSERT,		/* M-` */
604
	/* 225 */	ED_INSERT,		/* M-a */
605
	/* 226 */	ED_INSERT,		/* M-b */
606
	/* 227 */	ED_INSERT,		/* M-c */
607
	/* 228 */	ED_INSERT,		/* M-d */
608
	/* 229 */	ED_INSERT,		/* M-e */
609
	/* 230 */	ED_INSERT,		/* M-f */
610
	/* 231 */	ED_INSERT,		/* M-g */
611
	/* 232 */	ED_INSERT,		/* M-h */
612
	/* 233 */	ED_INSERT,		/* M-i */
613
	/* 234 */	ED_INSERT,		/* M-j */
614
	/* 235 */	ED_INSERT,		/* M-k */
615
	/* 236 */	ED_INSERT,		/* M-l */
616
	/* 237 */	ED_INSERT,		/* M-m */
617
	/* 238 */	ED_INSERT,		/* M-n */
618
	/* 239 */	ED_INSERT,		/* M-o */
619
	/* 240 */	ED_INSERT,		/* M-p */
620
	/* 241 */	ED_INSERT,		/* M-q */
621
	/* 242 */	ED_INSERT,		/* M-r */
622
	/* 243 */	ED_INSERT,		/* M-s */
623
	/* 244 */	ED_INSERT,		/* M-t */
624
	/* 245 */	ED_INSERT,		/* M-u */
625
	/* 246 */	ED_INSERT,		/* M-v */
626
	/* 247 */	ED_INSERT,		/* M-w */
627
	/* 248 */	ED_INSERT,		/* M-x */
628
	/* 249 */	ED_INSERT,		/* M-y */
629
	/* 250 */	ED_INSERT,		/* M-z */
630
	/* 251 */	ED_INSERT,		/* M-{ */
631
	/* 252 */	ED_INSERT,		/* M-| */
632
	/* 253 */	ED_INSERT,		/* M-} */
633
	/* 254 */	ED_INSERT,		/* M-~ */
634
	/* 255 */	ED_INSERT		/* M-^? */
635
};
636

637
static const el_action_t el_map_vi_command[] = {
638
	/*   0 */	ED_UNASSIGNED,		/* ^@ */
639
	/*   1 */	ED_MOVE_TO_BEG,		/* ^A */
640
	/*   2 */	ED_UNASSIGNED,		/* ^B */
641
	/*   3 */	ED_IGNORE,		/* ^C */
642
	/*   4 */	ED_UNASSIGNED,		/* ^D */
643
	/*   5 */	ED_MOVE_TO_END,		/* ^E */
644
	/*   6 */	ED_UNASSIGNED,		/* ^F */
645
	/*   7 */	ED_UNASSIGNED,		/* ^G */
646
	/*   8 */	ED_DELETE_PREV_CHAR,	/* ^H */
647
	/*   9 */	ED_UNASSIGNED,		/* ^I */
648
	/*  10 */	ED_NEWLINE,		/* ^J */
649
	/*  11 */	ED_KILL_LINE,		/* ^K */
650
	/*  12 */	ED_CLEAR_SCREEN,	/* ^L */
651
	/*  13 */	ED_NEWLINE,		/* ^M */
652
	/*  14 */	ED_NEXT_HISTORY,	/* ^N */
653
	/*  15 */	ED_IGNORE,		/* ^O */
654
	/*  16 */	ED_PREV_HISTORY,	/* ^P */
655
	/*  17 */	ED_IGNORE,		/* ^Q */
656
	/*  18 */	ED_REDISPLAY,		/* ^R */
657
	/*  19 */	ED_IGNORE,		/* ^S */
658
	/*  20 */	ED_UNASSIGNED,		/* ^T */
659
	/*  21 */	VI_KILL_LINE_PREV,	/* ^U */
660
	/*  22 */	ED_UNASSIGNED,		/* ^V */
661
	/*  23 */	ED_DELETE_PREV_WORD,	/* ^W */
662
	/*  24 */	ED_UNASSIGNED,		/* ^X */
663
	/*  25 */	ED_UNASSIGNED,		/* ^Y */
664
	/*  26 */	ED_UNASSIGNED,		/* ^Z */
665
	/*  27 */	EM_META_NEXT,		/* ^[ */
666
	/*  28 */	ED_IGNORE,		/* ^\ */
667
	/*  29 */	ED_UNASSIGNED,		/* ^] */
668
	/*  30 */	ED_UNASSIGNED,		/* ^^ */
669
	/*  31 */	ED_UNASSIGNED,		/* ^_ */
670
	/*  32 */	ED_NEXT_CHAR,		/* SPACE */
671
	/*  33 */	ED_UNASSIGNED,		/* ! */
672
	/*  34 */	ED_UNASSIGNED,		/* " */
673
	/*  35 */	VI_COMMENT_OUT,		/* # */
674
	/*  36 */	ED_MOVE_TO_END,		/* $ */
675
	/*  37 */	VI_MATCH,		/* % */
676
	/*  38 */	ED_UNASSIGNED,		/* & */
677
	/*  39 */	ED_UNASSIGNED,		/* ' */
678
	/*  40 */	ED_UNASSIGNED,		/* ( */
679
	/*  41 */	ED_UNASSIGNED,		/* ) */
680
	/*  42 */	ED_UNASSIGNED,		/* * */
681
	/*  43 */	ED_NEXT_HISTORY,	/* + */
682
	/*  44 */	VI_REPEAT_PREV_CHAR,	/* , */
683
	/*  45 */	ED_PREV_HISTORY,	/* - */
684
	/*  46 */	VI_REDO,		/* . */
685
	/*  47 */	VI_SEARCH_PREV,		/* / */
686
	/*  48 */	VI_ZERO,		/* 0 */
687
	/*  49 */	ED_ARGUMENT_DIGIT,	/* 1 */
688
	/*  50 */	ED_ARGUMENT_DIGIT,	/* 2 */
689
	/*  51 */	ED_ARGUMENT_DIGIT,	/* 3 */
690
	/*  52 */	ED_ARGUMENT_DIGIT,	/* 4 */
691
	/*  53 */	ED_ARGUMENT_DIGIT,	/* 5 */
692
	/*  54 */	ED_ARGUMENT_DIGIT,	/* 6 */
693
	/*  55 */	ED_ARGUMENT_DIGIT,	/* 7 */
694
	/*  56 */	ED_ARGUMENT_DIGIT,	/* 8 */
695
	/*  57 */	ED_ARGUMENT_DIGIT,	/* 9 */
696
	/*  58 */	ED_COMMAND,		/* : */
697
	/*  59 */	VI_REPEAT_NEXT_CHAR,	/* ; */
698
	/*  60 */	ED_UNASSIGNED,		/* < */
699
	/*  61 */	ED_UNASSIGNED,		/* = */
700
	/*  62 */	ED_UNASSIGNED,		/* > */
701
	/*  63 */	VI_SEARCH_NEXT,		/* ? */
702
	/*  64 */	VI_ALIAS,		/* @ */
703
	/*  65 */	VI_ADD_AT_EOL,		/* A */
704
	/*  66 */	VI_PREV_BIG_WORD,	/* B */
705
	/*  67 */	VI_CHANGE_TO_EOL,	/* C */
706
	/*  68 */	ED_KILL_LINE,		/* D */
707
	/*  69 */	VI_END_BIG_WORD,	/* E */
708
	/*  70 */	VI_PREV_CHAR,		/* F */
709
	/*  71 */	VI_TO_HISTORY_LINE,	/* G */
710
	/*  72 */	ED_UNASSIGNED,		/* H */
711
	/*  73 */	VI_INSERT_AT_BOL,	/* I */
712
	/*  74 */	ED_SEARCH_NEXT_HISTORY,	/* J */
713
	/*  75 */	ED_SEARCH_PREV_HISTORY,	/* K */
714
	/*  76 */	ED_UNASSIGNED,		/* L */
715
	/*  77 */	ED_UNASSIGNED,		/* M */
716
	/*  78 */	VI_REPEAT_SEARCH_PREV,	/* N */
717
	/*  79 */	ED_SEQUENCE_LEAD_IN,	/* O */
718
	/*  80 */	VI_PASTE_PREV,		/* P */
719
	/*  81 */	ED_UNASSIGNED,		/* Q */
720
	/*  82 */	VI_REPLACE_MODE,	/* R */
721
	/*  83 */	VI_SUBSTITUTE_LINE,	/* S */
722
	/*  84 */	VI_TO_PREV_CHAR,	/* T */
723
	/*  85 */	VI_UNDO_LINE,		/* U */
724
	/*  86 */	ED_UNASSIGNED,		/* V */
725
	/*  87 */	VI_NEXT_BIG_WORD,	/* W */
726
	/*  88 */	ED_DELETE_PREV_CHAR,	/* X */
727
	/*  89 */	VI_YANK_END,		/* Y */
728
	/*  90 */	ED_UNASSIGNED,		/* Z */
729
	/*  91 */	ED_SEQUENCE_LEAD_IN,	/* [ */
730
	/*  92 */	ED_UNASSIGNED,		/* \ */
731
	/*  93 */	ED_UNASSIGNED,		/* ] */
732
	/*  94 */	ED_MOVE_TO_BEG,		/* ^ */
733
	/*  95 */	VI_HISTORY_WORD,	/* _ */
734
	/*  96 */	ED_UNASSIGNED,		/* ` */
735
	/*  97 */	VI_ADD,			/* a */
736
	/*  98 */	VI_PREV_WORD,		/* b */
737
	/*  99 */	VI_CHANGE_META,		/* c */
738
	/* 100 */	VI_DELETE_META,		/* d */
739
	/* 101 */	VI_END_WORD,		/* e */
740
	/* 102 */	VI_NEXT_CHAR,		/* f */
741
	/* 103 */	ED_UNASSIGNED,		/* g */
742
	/* 104 */	ED_PREV_CHAR,		/* h */
743
	/* 105 */	VI_INSERT,		/* i */
744
	/* 106 */	ED_NEXT_HISTORY,	/* j */
745
	/* 107 */	ED_PREV_HISTORY,	/* k */
746
	/* 108 */	ED_NEXT_CHAR,		/* l */
747
	/* 109 */	ED_UNASSIGNED,		/* m */
748
	/* 110 */	VI_REPEAT_SEARCH_NEXT,	/* n */
749
	/* 111 */	ED_UNASSIGNED,		/* o */
750
	/* 112 */	VI_PASTE_NEXT,		/* p */
751
	/* 113 */	ED_UNASSIGNED,		/* q */
752
	/* 114 */	VI_REPLACE_CHAR,	/* r */
753
	/* 115 */	VI_SUBSTITUTE_CHAR,	/* s */
754
	/* 116 */	VI_TO_NEXT_CHAR,	/* t */
755
	/* 117 */	VI_UNDO,		/* u */
756
	/* 118 */	VI_HISTEDIT,		/* v */
757
	/* 119 */	VI_NEXT_WORD,		/* w */
758
	/* 120 */	ED_DELETE_NEXT_CHAR,	/* x */
759
	/* 121 */	VI_YANK,		/* y */
760
	/* 122 */	ED_UNASSIGNED,		/* z */
761
	/* 123 */	ED_UNASSIGNED,		/* { */
762
	/* 124 */	VI_TO_COLUMN,		/* | */
763
	/* 125 */	ED_UNASSIGNED,		/* } */
764
	/* 126 */	VI_CHANGE_CASE,		/* ~ */
765
	/* 127 */	ED_DELETE_PREV_CHAR,	/* ^? */
766
	/* 128 */	ED_UNASSIGNED,		/* M-^@ */
767
	/* 129 */	ED_UNASSIGNED,		/* M-^A */
768
	/* 130 */	ED_UNASSIGNED,		/* M-^B */
769
	/* 131 */	ED_UNASSIGNED,		/* M-^C */
770
	/* 132 */	ED_UNASSIGNED,		/* M-^D */
771
	/* 133 */	ED_UNASSIGNED,		/* M-^E */
772
	/* 134 */	ED_UNASSIGNED,		/* M-^F */
773
	/* 135 */	ED_UNASSIGNED,		/* M-^G */
774
	/* 136 */	ED_UNASSIGNED,		/* M-^H */
775
	/* 137 */	ED_UNASSIGNED,		/* M-^I */
776
	/* 138 */	ED_UNASSIGNED,		/* M-^J */
777
	/* 139 */	ED_UNASSIGNED,		/* M-^K */
778
	/* 140 */	ED_UNASSIGNED,		/* M-^L */
779
	/* 141 */	ED_UNASSIGNED,		/* M-^M */
780
	/* 142 */	ED_UNASSIGNED,		/* M-^N */
781
	/* 143 */	ED_UNASSIGNED,		/* M-^O */
782
	/* 144 */	ED_UNASSIGNED,		/* M-^P */
783
	/* 145 */	ED_UNASSIGNED,		/* M-^Q */
784
	/* 146 */	ED_UNASSIGNED,		/* M-^R */
785
	/* 147 */	ED_UNASSIGNED,		/* M-^S */
786
	/* 148 */	ED_UNASSIGNED,		/* M-^T */
787
	/* 149 */	ED_UNASSIGNED,		/* M-^U */
788
	/* 150 */	ED_UNASSIGNED,		/* M-^V */
789
	/* 151 */	ED_UNASSIGNED,		/* M-^W */
790
	/* 152 */	ED_UNASSIGNED,		/* M-^X */
791
	/* 153 */	ED_UNASSIGNED,		/* M-^Y */
792
	/* 154 */	ED_UNASSIGNED,		/* M-^Z */
793
	/* 155 */	ED_UNASSIGNED,		/* M-^[ */
794
	/* 156 */	ED_UNASSIGNED,		/* M-^\ */
795
	/* 157 */	ED_UNASSIGNED,		/* M-^] */
796
	/* 158 */	ED_UNASSIGNED,		/* M-^^ */
797
	/* 159 */	ED_UNASSIGNED,		/* M-^_ */
798
	/* 160 */	ED_UNASSIGNED,		/* M-SPACE */
799
	/* 161 */	ED_UNASSIGNED,		/* M-! */
800
	/* 162 */	ED_UNASSIGNED,		/* M-" */
801
	/* 163 */	ED_UNASSIGNED,		/* M-# */
802
	/* 164 */	ED_UNASSIGNED,		/* M-$ */
803
	/* 165 */	ED_UNASSIGNED,		/* M-% */
804
	/* 166 */	ED_UNASSIGNED,		/* M-& */
805
	/* 167 */	ED_UNASSIGNED,		/* M-' */
806
	/* 168 */	ED_UNASSIGNED,		/* M-( */
807
	/* 169 */	ED_UNASSIGNED,		/* M-) */
808
	/* 170 */	ED_UNASSIGNED,		/* M-* */
809
	/* 171 */	ED_UNASSIGNED,		/* M-+ */
810
	/* 172 */	ED_UNASSIGNED,		/* M-, */
811
	/* 173 */	ED_UNASSIGNED,		/* M-- */
812
	/* 174 */	ED_UNASSIGNED,		/* M-. */
813
	/* 175 */	ED_UNASSIGNED,		/* M-/ */
814
	/* 176 */	ED_UNASSIGNED,		/* M-0 */
815
	/* 177 */	ED_UNASSIGNED,		/* M-1 */
816
	/* 178 */	ED_UNASSIGNED,		/* M-2 */
817
	/* 179 */	ED_UNASSIGNED,		/* M-3 */
818
	/* 180 */	ED_UNASSIGNED,		/* M-4 */
819
	/* 181 */	ED_UNASSIGNED,		/* M-5 */
820
	/* 182 */	ED_UNASSIGNED,		/* M-6 */
821
	/* 183 */	ED_UNASSIGNED,		/* M-7 */
822
	/* 184 */	ED_UNASSIGNED,		/* M-8 */
823
	/* 185 */	ED_UNASSIGNED,		/* M-9 */
824
	/* 186 */	ED_UNASSIGNED,		/* M-: */
825
	/* 187 */	ED_UNASSIGNED,		/* M-; */
826
	/* 188 */	ED_UNASSIGNED,		/* M-< */
827
	/* 189 */	ED_UNASSIGNED,		/* M-= */
828
	/* 190 */	ED_UNASSIGNED,		/* M-> */
829
	/* 191 */	ED_UNASSIGNED,		/* M-? */
830
	/* 192 */	ED_UNASSIGNED,		/* M-@ */
831
	/* 193 */	ED_UNASSIGNED,		/* M-A */
832
	/* 194 */	ED_UNASSIGNED,		/* M-B */
833
	/* 195 */	ED_UNASSIGNED,		/* M-C */
834
	/* 196 */	ED_UNASSIGNED,		/* M-D */
835
	/* 197 */	ED_UNASSIGNED,		/* M-E */
836
	/* 198 */	ED_UNASSIGNED,		/* M-F */
837
	/* 199 */	ED_UNASSIGNED,		/* M-G */
838
	/* 200 */	ED_UNASSIGNED,		/* M-H */
839
	/* 201 */	ED_UNASSIGNED,		/* M-I */
840
	/* 202 */	ED_UNASSIGNED,		/* M-J */
841
	/* 203 */	ED_UNASSIGNED,		/* M-K */
842
	/* 204 */	ED_UNASSIGNED,		/* M-L */
843
	/* 205 */	ED_UNASSIGNED,		/* M-M */
844
	/* 206 */	ED_UNASSIGNED,		/* M-N */
845
	/* 207 */	ED_SEQUENCE_LEAD_IN,	/* M-O */
846
	/* 208 */	ED_UNASSIGNED,		/* M-P */
847
	/* 209 */	ED_UNASSIGNED,		/* M-Q */
848
	/* 210 */	ED_UNASSIGNED,		/* M-R */
849
	/* 211 */	ED_UNASSIGNED,		/* M-S */
850
	/* 212 */	ED_UNASSIGNED,		/* M-T */
851
	/* 213 */	ED_UNASSIGNED,		/* M-U */
852
	/* 214 */	ED_UNASSIGNED,		/* M-V */
853
	/* 215 */	ED_UNASSIGNED,		/* M-W */
854
	/* 216 */	ED_UNASSIGNED,		/* M-X */
855
	/* 217 */	ED_UNASSIGNED,		/* M-Y */
856
	/* 218 */	ED_UNASSIGNED,		/* M-Z */
857
	/* 219 */	ED_SEQUENCE_LEAD_IN,	/* M-[ */
858
	/* 220 */	ED_UNASSIGNED,		/* M-\ */
859
	/* 221 */	ED_UNASSIGNED,		/* M-] */
860
	/* 222 */	ED_UNASSIGNED,		/* M-^ */
861
	/* 223 */	ED_UNASSIGNED,		/* M-_ */
862
	/* 224 */	ED_UNASSIGNED,		/* M-` */
863
	/* 225 */	ED_UNASSIGNED,		/* M-a */
864
	/* 226 */	ED_UNASSIGNED,		/* M-b */
865
	/* 227 */	ED_UNASSIGNED,		/* M-c */
866
	/* 228 */	ED_UNASSIGNED,		/* M-d */
867
	/* 229 */	ED_UNASSIGNED,		/* M-e */
868
	/* 230 */	ED_UNASSIGNED,		/* M-f */
869
	/* 231 */	ED_UNASSIGNED,		/* M-g */
870
	/* 232 */	ED_UNASSIGNED,		/* M-h */
871
	/* 233 */	ED_UNASSIGNED,		/* M-i */
872
	/* 234 */	ED_UNASSIGNED,		/* M-j */
873
	/* 235 */	ED_UNASSIGNED,		/* M-k */
874
	/* 236 */	ED_UNASSIGNED,		/* M-l */
875
	/* 237 */	ED_UNASSIGNED,		/* M-m */
876
	/* 238 */	ED_UNASSIGNED,		/* M-n */
877
	/* 239 */	ED_UNASSIGNED,		/* M-o */
878
	/* 240 */	ED_UNASSIGNED,		/* M-p */
879
	/* 241 */	ED_UNASSIGNED,		/* M-q */
880
	/* 242 */	ED_UNASSIGNED,		/* M-r */
881
	/* 243 */	ED_UNASSIGNED,		/* M-s */
882
	/* 244 */	ED_UNASSIGNED,		/* M-t */
883
	/* 245 */	ED_UNASSIGNED,		/* M-u */
884
	/* 246 */	ED_UNASSIGNED,		/* M-v */
885
	/* 247 */	ED_UNASSIGNED,		/* M-w */
886
	/* 248 */	ED_UNASSIGNED,		/* M-x */
887
	/* 249 */	ED_UNASSIGNED,		/* M-y */
888
	/* 250 */	ED_UNASSIGNED,		/* M-z */
889
	/* 251 */	ED_UNASSIGNED,		/* M-{ */
890
	/* 252 */	ED_UNASSIGNED,		/* M-| */
891
	/* 253 */	ED_UNASSIGNED,		/* M-} */
892
	/* 254 */	ED_UNASSIGNED,		/* M-~ */
893
	/* 255 */	ED_UNASSIGNED		/* M-^? */
894
};
895

896

897
/* map_init():
898
 *	Initialize and allocate the maps
899
 */
900
libedit_private int
901
map_init(EditLine *el)
902
{
903

904
	/*
905
         * Make sure those are correct before starting.
906
         */
907
#ifdef MAP_DEBUG
908
	if (sizeof(el_map_emacs) != N_KEYS * sizeof(el_action_t))
909
		EL_ABORT((el->el_errfile, "Emacs map incorrect\n"));
910
	if (sizeof(el_map_vi_command) != N_KEYS * sizeof(el_action_t))
911
		EL_ABORT((el->el_errfile, "Vi command map incorrect\n"));
912
	if (sizeof(el_map_vi_insert) != N_KEYS * sizeof(el_action_t))
913
		EL_ABORT((el->el_errfile, "Vi insert map incorrect\n"));
914
#endif
915

916
	el->el_map.alt = el_calloc(N_KEYS, sizeof(*el->el_map.alt));
917
	if (el->el_map.alt == NULL)
918
		return -1;
919
	el->el_map.key = el_calloc(N_KEYS, sizeof(*el->el_map.key));
920
	if (el->el_map.key == NULL)
921
		goto out;
922
	el->el_map.emacs = el_map_emacs;
923
	el->el_map.vic = el_map_vi_command;
924
	el->el_map.vii = el_map_vi_insert;
925
	el->el_map.help = el_calloc(EL_NUM_FCNS, sizeof(*el->el_map.help));
926
	if (el->el_map.help == NULL)
927
		goto out;
928
	(void) memcpy(el->el_map.help, el_func_help,
929
	    sizeof(*el->el_map.help) * EL_NUM_FCNS);
930
	el->el_map.func = el_calloc(EL_NUM_FCNS, sizeof(*el->el_map.func));
931
	if (el->el_map.func == NULL)
932
		goto out;
933
	memcpy(el->el_map.func, el_func, sizeof(*el->el_map.func)
934
	    * EL_NUM_FCNS);
935
	el->el_map.nfunc = EL_NUM_FCNS;
936

937
#ifdef VIDEFAULT
938
	map_init_vi(el);
939
#else
940
	map_init_emacs(el);
941
#endif /* VIDEFAULT */
942
	return 0;
943
out:
944
	map_end(el);
945
	return -1;
946
}
947

948

949
/* map_end():
950
 *	Free the space taken by the editor maps
951
 */
952
libedit_private void
953
map_end(EditLine *el)
954
{
955

956
	el_free(el->el_map.alt);
957
	el->el_map.alt = NULL;
958
	el_free(el->el_map.key);
959
	el->el_map.key = NULL;
960
	el->el_map.emacs = NULL;
961
	el->el_map.vic = NULL;
962
	el->el_map.vii = NULL;
963
	el_free(el->el_map.help);
964
	el->el_map.help = NULL;
965
	el_free(el->el_map.func);
966
	el->el_map.func = NULL;
967
}
968

969

970
/* map_init_nls():
971
 *	Find all the printable keys and bind them to self insert
972
 */
973
static void
974
map_init_nls(EditLine *el)
975
{
976
	int i;
977

978
	el_action_t *map = el->el_map.key;
979

980
	for (i = 0200; i <= 0377; i++)
981
		if (iswprint(i))
982
			map[i] = ED_INSERT;
983
}
984

985

986
/* map_init_meta():
987
 *	Bind all the meta keys to the appropriate ESC-<key> sequence
988
 */
989
static void
990
map_init_meta(EditLine *el)
991
{
992
	wchar_t buf[3];
993
	int i;
994
	el_action_t *map = el->el_map.key;
995
	el_action_t *alt = el->el_map.alt;
996

997
	for (i = 0; i <= 0377 && map[i] != EM_META_NEXT; i++)
998
		continue;
999

1000
	if (i > 0377) {
1001
		for (i = 0; i <= 0377 && alt[i] != EM_META_NEXT; i++)
1002
			continue;
1003
		if (i > 0377) {
1004
			i = 033;
1005
			if (el->el_map.type == MAP_VI)
1006
				map = alt;
1007
		} else
1008
			map = alt;
1009
	}
1010
	buf[0] = (wchar_t)i;
1011
	buf[2] = 0;
1012
	for (i = 0200; i <= 0377; i++)
1013
		switch (map[i]) {
1014
		case ED_INSERT:
1015
		case ED_UNASSIGNED:
1016
		case ED_SEQUENCE_LEAD_IN:
1017
			break;
1018
		default:
1019
			buf[1] = i & 0177;
1020
			keymacro_add(el, buf, keymacro_map_cmd(el, (int) map[i]), XK_CMD);
1021
			break;
1022
		}
1023
	map[(int) buf[0]] = ED_SEQUENCE_LEAD_IN;
1024
}
1025

1026

1027
/* map_init_vi():
1028
 *	Initialize the vi bindings
1029
 */
1030
libedit_private void
1031
map_init_vi(EditLine *el)
1032
{
1033
	int i;
1034
	el_action_t *key = el->el_map.key;
1035
	el_action_t *alt = el->el_map.alt;
1036
	const el_action_t *vii = el->el_map.vii;
1037
	const el_action_t *vic = el->el_map.vic;
1038

1039
	el->el_map.type = MAP_VI;
1040
	el->el_map.current = el->el_map.key;
1041

1042
	keymacro_reset(el);
1043

1044
	for (i = 0; i < N_KEYS; i++) {
1045
		key[i] = vii[i];
1046
		alt[i] = vic[i];
1047
	}
1048

1049
	map_init_meta(el);
1050
	map_init_nls(el);
1051

1052
	tty_bind_char(el, 1);
1053
	terminal_bind_arrow(el);
1054
}
1055

1056

1057
/* map_init_emacs():
1058
 *	Initialize the emacs bindings
1059
 */
1060
libedit_private void
1061
map_init_emacs(EditLine *el)
1062
{
1063
	int i;
1064
	wchar_t buf[3];
1065
	el_action_t *key = el->el_map.key;
1066
	el_action_t *alt = el->el_map.alt;
1067
	const el_action_t *emacs = el->el_map.emacs;
1068

1069
	el->el_map.type = MAP_EMACS;
1070
	el->el_map.current = el->el_map.key;
1071
	keymacro_reset(el);
1072

1073
	for (i = 0; i < N_KEYS; i++) {
1074
		key[i] = emacs[i];
1075
		alt[i] = ED_UNASSIGNED;
1076
	}
1077

1078
	map_init_meta(el);
1079
	map_init_nls(el);
1080

1081
	buf[0] = CONTROL('X');
1082
	buf[1] = CONTROL('X');
1083
	buf[2] = 0;
1084
	keymacro_add(el, buf, keymacro_map_cmd(el, EM_EXCHANGE_MARK), XK_CMD);
1085

1086
	tty_bind_char(el, 1);
1087
	terminal_bind_arrow(el);
1088
}
1089

1090

1091
/* map_set_editor():
1092
 *	Set the editor
1093
 */
1094
libedit_private int
1095
map_set_editor(EditLine *el, wchar_t *editor)
1096
{
1097

1098
	if (wcscmp(editor, L"emacs") == 0) {
1099
		map_init_emacs(el);
1100
		return 0;
1101
	}
1102
	if (wcscmp(editor, L"vi") == 0) {
1103
		map_init_vi(el);
1104
		return 0;
1105
	}
1106
	return -1;
1107
}
1108

1109

1110
/* map_get_editor():
1111
 *	Retrieve the editor
1112
 */
1113
libedit_private int
1114
map_get_editor(EditLine *el, const wchar_t **editor)
1115
{
1116

1117
	if (editor == NULL)
1118
		return -1;
1119
	switch (el->el_map.type) {
1120
	case MAP_EMACS:
1121
		*editor = L"emacs";
1122
		return 0;
1123
	case MAP_VI:
1124
		*editor = L"vi";
1125
		return 0;
1126
	}
1127
	return -1;
1128
}
1129

1130

1131
/* map_print_key():
1132
 *	Print the function description for 1 key
1133
 */
1134
static void
1135
map_print_key(EditLine *el, el_action_t *map, const wchar_t *in)
1136
{
1137
	char outbuf[EL_BUFSIZ];
1138
	el_bindings_t *bp, *ep;
1139

1140
	if (in[0] == '\0' || in[1] == '\0') {
1141
		(void) keymacro__decode_str(in, outbuf, sizeof(outbuf), "");
1142
		ep = &el->el_map.help[el->el_map.nfunc];
1143
		for (bp = el->el_map.help; bp < ep; bp++)
1144
			if (bp->func == map[(unsigned char) *in]) {
1145
				(void) fprintf(el->el_outfile,
1146
				    "%s\t->\t%ls\n", outbuf, bp->name);
1147
				return;
1148
			}
1149
	} else
1150
		keymacro_print(el, in);
1151
}
1152

1153

1154
/* map_print_some_keys():
1155
 *	Print keys from first to last
1156
 */
1157
static void
1158
map_print_some_keys(EditLine *el, el_action_t *map, wint_t first, wint_t last)
1159
{
1160
	el_bindings_t *bp, *ep;
1161
	wchar_t firstbuf[2], lastbuf[2];
1162
	char unparsbuf[EL_BUFSIZ], extrabuf[EL_BUFSIZ];
1163

1164
	firstbuf[0] = first;
1165
	firstbuf[1] = 0;
1166
	lastbuf[0] = last;
1167
	lastbuf[1] = 0;
1168
	if (map[first] == ED_UNASSIGNED) {
1169
		if (first == last) {
1170
			(void) keymacro__decode_str(firstbuf, unparsbuf,
1171
			    sizeof(unparsbuf), STRQQ);
1172
			(void) fprintf(el->el_outfile,
1173
			    "%-15s->  is undefined\n", unparsbuf);
1174
		}
1175
		return;
1176
	}
1177
	ep = &el->el_map.help[el->el_map.nfunc];
1178
	for (bp = el->el_map.help; bp < ep; bp++) {
1179
		if (bp->func == map[first]) {
1180
			if (first == last) {
1181
				(void) keymacro__decode_str(firstbuf, unparsbuf,
1182
				    sizeof(unparsbuf), STRQQ);
1183
				(void) fprintf(el->el_outfile, "%-15s->  %ls\n",
1184
				    unparsbuf, bp->name);
1185
			} else {
1186
				(void) keymacro__decode_str(firstbuf, unparsbuf,
1187
				    sizeof(unparsbuf), STRQQ);
1188
				(void) keymacro__decode_str(lastbuf, extrabuf,
1189
				    sizeof(extrabuf), STRQQ);
1190
				(void) fprintf(el->el_outfile,
1191
				    "%-4s to %-7s->  %ls\n",
1192
				    unparsbuf, extrabuf, bp->name);
1193
			}
1194
			return;
1195
		}
1196
	}
1197
#ifdef MAP_DEBUG
1198
	if (map == el->el_map.key) {
1199
		(void) keymacro__decode_str(firstbuf, unparsbuf,
1200
		    sizeof(unparsbuf), STRQQ);
1201
		(void) fprintf(el->el_outfile,
1202
		    "BUG!!! %s isn't bound to anything.\n", unparsbuf);
1203
		(void) fprintf(el->el_outfile, "el->el_map.key[%d] == %d\n",
1204
		    first, el->el_map.key[first]);
1205
	} else {
1206
		(void) keymacro__decode_str(firstbuf, unparsbuf,
1207
		    sizeof(unparsbuf), STRQQ);
1208
		(void) fprintf(el->el_outfile,
1209
		    "BUG!!! %s isn't bound to anything.\n", unparsbuf);
1210
		(void) fprintf(el->el_outfile, "el->el_map.alt[%d] == %d\n",
1211
		    first, el->el_map.alt[first]);
1212
	}
1213
#endif
1214
	EL_ABORT((el->el_errfile, "Error printing keys\n"));
1215
}
1216

1217

1218
/* map_print_all_keys():
1219
 *	Print the function description for all keys.
1220
 */
1221
static void
1222
map_print_all_keys(EditLine *el)
1223
{
1224
	int prev, i;
1225

1226
	(void) fprintf(el->el_outfile, "Standard key bindings\n");
1227
	prev = 0;
1228
	for (i = 0; i < N_KEYS; i++) {
1229
		if (el->el_map.key[prev] == el->el_map.key[i])
1230
			continue;
1231
		map_print_some_keys(el, el->el_map.key, prev, i - 1);
1232
		prev = i;
1233
	}
1234
	map_print_some_keys(el, el->el_map.key, prev, i - 1);
1235

1236
	(void) fprintf(el->el_outfile, "Alternative key bindings\n");
1237
	prev = 0;
1238
	for (i = 0; i < N_KEYS; i++) {
1239
		if (el->el_map.alt[prev] == el->el_map.alt[i])
1240
			continue;
1241
		map_print_some_keys(el, el->el_map.alt, prev, i - 1);
1242
		prev = i;
1243
	}
1244
	map_print_some_keys(el, el->el_map.alt, prev, i - 1);
1245

1246
	(void) fprintf(el->el_outfile, "Multi-character bindings\n");
1247
	keymacro_print(el, L"");
1248
	(void) fprintf(el->el_outfile, "Arrow key bindings\n");
1249
	terminal_print_arrow(el, L"");
1250
}
1251

1252

1253
/* map_bind():
1254
 *	Add/remove/change bindings
1255
 */
1256
libedit_private int
1257
map_bind(EditLine *el, int argc, const wchar_t **argv)
1258
{
1259
	el_action_t *map;
1260
	int ntype, rem;
1261
	const wchar_t *p;
1262
	wchar_t inbuf[EL_BUFSIZ];
1263
	wchar_t outbuf[EL_BUFSIZ];
1264
	const wchar_t *in = NULL;
1265
	wchar_t *out;
1266
	el_bindings_t *bp, *ep;
1267
	int cmd;
1268
	int key;
1269

1270
	if (argv == NULL)
1271
		return -1;
1272

1273
	map = el->el_map.key;
1274
	ntype = XK_CMD;
1275
	key = rem = 0;
1276
	for (argc = 1; (p = argv[argc]) != NULL; argc++)
1277
		if (p[0] == '-')
1278
			switch (p[1]) {
1279
			case 'a':
1280
				map = el->el_map.alt;
1281
				break;
1282

1283
			case 's':
1284
				ntype = XK_STR;
1285
				break;
1286
			case 'k':
1287
				key = 1;
1288
				break;
1289

1290
			case 'r':
1291
				rem = 1;
1292
				break;
1293

1294
			case 'v':
1295
				map_init_vi(el);
1296
				return 0;
1297

1298
			case 'e':
1299
				map_init_emacs(el);
1300
				return 0;
1301

1302
			case 'l':
1303
				ep = &el->el_map.help[el->el_map.nfunc];
1304
				for (bp = el->el_map.help; bp < ep; bp++)
1305
					(void) fprintf(el->el_outfile,
1306
					    "%ls\n\t%ls\n",
1307
					    bp->name, bp->description);
1308
				return 0;
1309
			default:
1310
				(void) fprintf(el->el_errfile,
1311
				    "%ls: Invalid switch `%lc'.\n",
1312
				    argv[0], (wint_t)p[1]);
1313
			}
1314
		else
1315
			break;
1316

1317
	if (argv[argc] == NULL) {
1318
		map_print_all_keys(el);
1319
		return 0;
1320
	}
1321
	if (key)
1322
		in = argv[argc++];
1323
	else if ((in = parse__string(inbuf, argv[argc++])) == NULL) {
1324
		(void) fprintf(el->el_errfile,
1325
		    "%ls: Invalid \\ or ^ in instring.\n",
1326
		    argv[0]);
1327
		return -1;
1328
	}
1329
	if (rem) {
1330
		if (key) {
1331
			(void) terminal_clear_arrow(el, in);
1332
			return -1;
1333
		}
1334
		if (in[1])
1335
			(void) keymacro_delete(el, in);
1336
		else if (map[(unsigned char) *in] == ED_SEQUENCE_LEAD_IN)
1337
			(void) keymacro_delete(el, in);
1338
		else
1339
			map[(unsigned char) *in] = ED_UNASSIGNED;
1340
		return 0;
1341
	}
1342
	if (argv[argc] == NULL) {
1343
		if (key)
1344
			terminal_print_arrow(el, in);
1345
		else
1346
			map_print_key(el, map, in);
1347
		return 0;
1348
	}
1349
#ifdef notyet
1350
	if (argv[argc + 1] != NULL) {
1351
		bindkeymacro_usage();
1352
		return -1;
1353
	}
1354
#endif
1355

1356
	switch (ntype) {
1357
	case XK_STR:
1358
		if ((out = parse__string(outbuf, argv[argc])) == NULL) {
1359
			(void) fprintf(el->el_errfile,
1360
			    "%ls: Invalid \\ or ^ in outstring.\n", argv[0]);
1361
			return -1;
1362
		}
1363
		if (key)
1364
			terminal_set_arrow(el, in, keymacro_map_str(el, out), ntype);
1365
		else
1366
			keymacro_add(el, in, keymacro_map_str(el, out), ntype);
1367
		map[(unsigned char) *in] = ED_SEQUENCE_LEAD_IN;
1368
		break;
1369

1370
	case XK_CMD:
1371
		if ((cmd = parse_cmd(el, argv[argc])) == -1) {
1372
			(void) fprintf(el->el_errfile,
1373
			    "%ls: Invalid command `%ls'.\n",
1374
			    argv[0], argv[argc]);
1375
			return -1;
1376
		}
1377
		if (key)
1378
			terminal_set_arrow(el, in, keymacro_map_cmd(el, cmd), ntype);
1379
		else {
1380
			if (in[1]) {
1381
				keymacro_add(el, in, keymacro_map_cmd(el, cmd), ntype);
1382
				map[(unsigned char) *in] = ED_SEQUENCE_LEAD_IN;
1383
			} else {
1384
				keymacro_clear(el, map, in);
1385
				map[(unsigned char) *in] = (el_action_t)cmd;
1386
			}
1387
		}
1388
		break;
1389

1390
	/* coverity[dead_error_begin] */
1391
	default:
1392
		EL_ABORT((el->el_errfile, "Bad XK_ type %d\n", ntype));
1393
	}
1394
	return 0;
1395
}
1396

1397

1398
/* map_addfunc():
1399
 *	add a user defined function
1400
 */
1401
libedit_private int
1402
map_addfunc(EditLine *el, const wchar_t *name, const wchar_t *help,
1403
    el_func_t func)
1404
{
1405
	void *p;
1406
	size_t nf = el->el_map.nfunc + 1;
1407

1408
	if (name == NULL || help == NULL || func == NULL)
1409
		return -1;
1410

1411
	if ((p = el_realloc(el->el_map.func, nf *
1412
	    sizeof(*el->el_map.func))) == NULL)
1413
		return -1;
1414
	el->el_map.func = p;
1415
	if ((p = el_realloc(el->el_map.help, nf * sizeof(*el->el_map.help)))
1416
	    == NULL)
1417
		return -1;
1418
	el->el_map.help = p;
1419

1420
	nf = (size_t)el->el_map.nfunc;
1421
	el->el_map.func[nf] = func;
1422

1423
	el->el_map.help[nf].name = name;
1424
	el->el_map.help[nf].func = (int)nf;
1425
	el->el_map.help[nf].description = help;
1426
	el->el_map.nfunc++;
1427

1428
	return 0;
1429
}
1430

1431
Product

Resources

Company
