map.c revision 1.42 1 1.42 christos /* $NetBSD: map.c,v 1.42 2016/02/16 22:53:14 christos Exp $ */
2 1.3 lukem
3 1.1 cgd /*-
4 1.1 cgd * Copyright (c) 1992, 1993
5 1.1 cgd * The Regents of the University of California. All rights reserved.
6 1.1 cgd *
7 1.1 cgd * This code is derived from software contributed to Berkeley by
8 1.1 cgd * Christos Zoulas of Cornell University.
9 1.1 cgd *
10 1.1 cgd * Redistribution and use in source and binary forms, with or without
11 1.1 cgd * modification, are permitted provided that the following conditions
12 1.1 cgd * are met:
13 1.1 cgd * 1. Redistributions of source code must retain the above copyright
14 1.1 cgd * notice, this list of conditions and the following disclaimer.
15 1.1 cgd * 2. Redistributions in binary form must reproduce the above copyright
16 1.1 cgd * notice, this list of conditions and the following disclaimer in the
17 1.1 cgd * documentation and/or other materials provided with the distribution.
18 1.19 agc * 3. Neither the name of the University nor the names of its contributors
19 1.1 cgd * may be used to endorse or promote products derived from this software
20 1.1 cgd * without specific prior written permission.
21 1.1 cgd *
22 1.1 cgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
23 1.1 cgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24 1.1 cgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25 1.1 cgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
26 1.1 cgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27 1.1 cgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28 1.1 cgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29 1.1 cgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30 1.1 cgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31 1.1 cgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32 1.1 cgd * SUCH DAMAGE.
33 1.1 cgd */
34 1.1 cgd
35 1.15 christos #include "config.h"
36 1.1 cgd #if !defined(lint) && !defined(SCCSID)
37 1.3 lukem #if 0
38 1.1 cgd static char sccsid[] = "@(#)map.c 8.1 (Berkeley) 6/4/93";
39 1.3 lukem #else
40 1.42 christos __RCSID("$NetBSD: map.c,v 1.42 2016/02/16 22:53:14 christos Exp $");
41 1.3 lukem #endif
42 1.1 cgd #endif /* not lint && not SCCSID */
43 1.1 cgd
44 1.1 cgd /*
45 1.9 simonb * map.c: Editor function definitions
46 1.1 cgd */
47 1.42 christos #include <ctype.h>
48 1.1 cgd #include <stdlib.h>
49 1.42 christos #include <string.h>
50 1.41 christos
51 1.1 cgd #include "el.h"
52 1.41 christos #include "help.h"
53 1.41 christos #include "parse.h"
54 1.1 cgd
55 1.25 christos private void map_print_key(EditLine *, el_action_t *, const Char *);
56 1.37 christos private void map_print_some_keys(EditLine *, el_action_t *, wint_t, wint_t);
57 1.11 lukem private void map_print_all_keys(EditLine *);
58 1.11 lukem private void map_init_nls(EditLine *);
59 1.11 lukem private void map_init_meta(EditLine *);
60 1.1 cgd
61 1.1 cgd /* keymap tables ; should be N_KEYS*sizeof(KEYCMD) bytes long */
62 1.1 cgd
63 1.11 lukem
64 1.14 jdolecek private const el_action_t el_map_emacs[] = {
65 1.11 lukem /* 0 */ EM_SET_MARK, /* ^@ */
66 1.11 lukem /* 1 */ ED_MOVE_TO_BEG, /* ^A */
67 1.11 lukem /* 2 */ ED_PREV_CHAR, /* ^B */
68 1.11 lukem /* 3 */ ED_TTY_SIGINT, /* ^C */
69 1.11 lukem /* 4 */ EM_DELETE_OR_LIST, /* ^D */
70 1.11 lukem /* 5 */ ED_MOVE_TO_END, /* ^E */
71 1.11 lukem /* 6 */ ED_NEXT_CHAR, /* ^F */
72 1.11 lukem /* 7 */ ED_UNASSIGNED, /* ^G */
73 1.20 mycroft /* 8 */ EM_DELETE_PREV_CHAR, /* ^H */
74 1.11 lukem /* 9 */ ED_UNASSIGNED, /* ^I */
75 1.11 lukem /* 10 */ ED_NEWLINE, /* ^J */
76 1.11 lukem /* 11 */ ED_KILL_LINE, /* ^K */
77 1.11 lukem /* 12 */ ED_CLEAR_SCREEN, /* ^L */
78 1.11 lukem /* 13 */ ED_NEWLINE, /* ^M */
79 1.11 lukem /* 14 */ ED_NEXT_HISTORY, /* ^N */
80 1.11 lukem /* 15 */ ED_TTY_FLUSH_OUTPUT, /* ^O */
81 1.11 lukem /* 16 */ ED_PREV_HISTORY, /* ^P */
82 1.11 lukem /* 17 */ ED_TTY_START_OUTPUT, /* ^Q */
83 1.11 lukem /* 18 */ ED_REDISPLAY, /* ^R */
84 1.11 lukem /* 19 */ ED_TTY_STOP_OUTPUT, /* ^S */
85 1.11 lukem /* 20 */ ED_TRANSPOSE_CHARS, /* ^T */
86 1.11 lukem /* 21 */ EM_KILL_LINE, /* ^U */
87 1.11 lukem /* 22 */ ED_QUOTED_INSERT, /* ^V */
88 1.11 lukem /* 23 */ EM_KILL_REGION, /* ^W */
89 1.11 lukem /* 24 */ ED_SEQUENCE_LEAD_IN, /* ^X */
90 1.11 lukem /* 25 */ EM_YANK, /* ^Y */
91 1.11 lukem /* 26 */ ED_TTY_SIGTSTP, /* ^Z */
92 1.11 lukem /* 27 */ EM_META_NEXT, /* ^[ */
93 1.11 lukem /* 28 */ ED_TTY_SIGQUIT, /* ^\ */
94 1.11 lukem /* 29 */ ED_TTY_DSUSP, /* ^] */
95 1.11 lukem /* 30 */ ED_UNASSIGNED, /* ^^ */
96 1.11 lukem /* 31 */ ED_UNASSIGNED, /* ^_ */
97 1.11 lukem /* 32 */ ED_INSERT, /* SPACE */
98 1.11 lukem /* 33 */ ED_INSERT, /* ! */
99 1.11 lukem /* 34 */ ED_INSERT, /* " */
100 1.11 lukem /* 35 */ ED_INSERT, /* # */
101 1.11 lukem /* 36 */ ED_INSERT, /* $ */
102 1.11 lukem /* 37 */ ED_INSERT, /* % */
103 1.11 lukem /* 38 */ ED_INSERT, /* & */
104 1.11 lukem /* 39 */ ED_INSERT, /* ' */
105 1.11 lukem /* 40 */ ED_INSERT, /* ( */
106 1.11 lukem /* 41 */ ED_INSERT, /* ) */
107 1.11 lukem /* 42 */ ED_INSERT, /* * */
108 1.11 lukem /* 43 */ ED_INSERT, /* + */
109 1.11 lukem /* 44 */ ED_INSERT, /* , */
110 1.11 lukem /* 45 */ ED_INSERT, /* - */
111 1.11 lukem /* 46 */ ED_INSERT, /* . */
112 1.11 lukem /* 47 */ ED_INSERT, /* / */
113 1.11 lukem /* 48 */ ED_DIGIT, /* 0 */
114 1.11 lukem /* 49 */ ED_DIGIT, /* 1 */
115 1.11 lukem /* 50 */ ED_DIGIT, /* 2 */
116 1.11 lukem /* 51 */ ED_DIGIT, /* 3 */
117 1.11 lukem /* 52 */ ED_DIGIT, /* 4 */
118 1.11 lukem /* 53 */ ED_DIGIT, /* 5 */
119 1.11 lukem /* 54 */ ED_DIGIT, /* 6 */
120 1.11 lukem /* 55 */ ED_DIGIT, /* 7 */
121 1.11 lukem /* 56 */ ED_DIGIT, /* 8 */
122 1.11 lukem /* 57 */ ED_DIGIT, /* 9 */
123 1.11 lukem /* 58 */ ED_INSERT, /* : */
124 1.11 lukem /* 59 */ ED_INSERT, /* ; */
125 1.11 lukem /* 60 */ ED_INSERT, /* < */
126 1.11 lukem /* 61 */ ED_INSERT, /* = */
127 1.11 lukem /* 62 */ ED_INSERT, /* > */
128 1.11 lukem /* 63 */ ED_INSERT, /* ? */
129 1.11 lukem /* 64 */ ED_INSERT, /* @ */
130 1.11 lukem /* 65 */ ED_INSERT, /* A */
131 1.11 lukem /* 66 */ ED_INSERT, /* B */
132 1.11 lukem /* 67 */ ED_INSERT, /* C */
133 1.11 lukem /* 68 */ ED_INSERT, /* D */
134 1.11 lukem /* 69 */ ED_INSERT, /* E */
135 1.11 lukem /* 70 */ ED_INSERT, /* F */
136 1.11 lukem /* 71 */ ED_INSERT, /* G */
137 1.11 lukem /* 72 */ ED_INSERT, /* H */
138 1.11 lukem /* 73 */ ED_INSERT, /* I */
139 1.11 lukem /* 74 */ ED_INSERT, /* J */
140 1.11 lukem /* 75 */ ED_INSERT, /* K */
141 1.11 lukem /* 76 */ ED_INSERT, /* L */
142 1.11 lukem /* 77 */ ED_INSERT, /* M */
143 1.11 lukem /* 78 */ ED_INSERT, /* N */
144 1.11 lukem /* 79 */ ED_INSERT, /* O */
145 1.11 lukem /* 80 */ ED_INSERT, /* P */
146 1.11 lukem /* 81 */ ED_INSERT, /* Q */
147 1.11 lukem /* 82 */ ED_INSERT, /* R */
148 1.11 lukem /* 83 */ ED_INSERT, /* S */
149 1.11 lukem /* 84 */ ED_INSERT, /* T */
150 1.11 lukem /* 85 */ ED_INSERT, /* U */
151 1.11 lukem /* 86 */ ED_INSERT, /* V */
152 1.11 lukem /* 87 */ ED_INSERT, /* W */
153 1.11 lukem /* 88 */ ED_INSERT, /* X */
154 1.11 lukem /* 89 */ ED_INSERT, /* Y */
155 1.11 lukem /* 90 */ ED_INSERT, /* Z */
156 1.11 lukem /* 91 */ ED_INSERT, /* [ */
157 1.11 lukem /* 92 */ ED_INSERT, /* \ */
158 1.11 lukem /* 93 */ ED_INSERT, /* ] */
159 1.11 lukem /* 94 */ ED_INSERT, /* ^ */
160 1.11 lukem /* 95 */ ED_INSERT, /* _ */
161 1.11 lukem /* 96 */ ED_INSERT, /* ` */
162 1.11 lukem /* 97 */ ED_INSERT, /* a */
163 1.11 lukem /* 98 */ ED_INSERT, /* b */
164 1.11 lukem /* 99 */ ED_INSERT, /* c */
165 1.11 lukem /* 100 */ ED_INSERT, /* d */
166 1.11 lukem /* 101 */ ED_INSERT, /* e */
167 1.11 lukem /* 102 */ ED_INSERT, /* f */
168 1.11 lukem /* 103 */ ED_INSERT, /* g */
169 1.11 lukem /* 104 */ ED_INSERT, /* h */
170 1.11 lukem /* 105 */ ED_INSERT, /* i */
171 1.11 lukem /* 106 */ ED_INSERT, /* j */
172 1.11 lukem /* 107 */ ED_INSERT, /* k */
173 1.11 lukem /* 108 */ ED_INSERT, /* l */
174 1.11 lukem /* 109 */ ED_INSERT, /* m */
175 1.11 lukem /* 110 */ ED_INSERT, /* n */
176 1.11 lukem /* 111 */ ED_INSERT, /* o */
177 1.11 lukem /* 112 */ ED_INSERT, /* p */
178 1.11 lukem /* 113 */ ED_INSERT, /* q */
179 1.11 lukem /* 114 */ ED_INSERT, /* r */
180 1.11 lukem /* 115 */ ED_INSERT, /* s */
181 1.11 lukem /* 116 */ ED_INSERT, /* t */
182 1.11 lukem /* 117 */ ED_INSERT, /* u */
183 1.11 lukem /* 118 */ ED_INSERT, /* v */
184 1.11 lukem /* 119 */ ED_INSERT, /* w */
185 1.11 lukem /* 120 */ ED_INSERT, /* x */
186 1.11 lukem /* 121 */ ED_INSERT, /* y */
187 1.11 lukem /* 122 */ ED_INSERT, /* z */
188 1.11 lukem /* 123 */ ED_INSERT, /* { */
189 1.11 lukem /* 124 */ ED_INSERT, /* | */
190 1.11 lukem /* 125 */ ED_INSERT, /* } */
191 1.11 lukem /* 126 */ ED_INSERT, /* ~ */
192 1.20 mycroft /* 127 */ EM_DELETE_PREV_CHAR, /* ^? */
193 1.11 lukem /* 128 */ ED_UNASSIGNED, /* M-^@ */
194 1.11 lukem /* 129 */ ED_UNASSIGNED, /* M-^A */
195 1.11 lukem /* 130 */ ED_UNASSIGNED, /* M-^B */
196 1.11 lukem /* 131 */ ED_UNASSIGNED, /* M-^C */
197 1.11 lukem /* 132 */ ED_UNASSIGNED, /* M-^D */
198 1.11 lukem /* 133 */ ED_UNASSIGNED, /* M-^E */
199 1.11 lukem /* 134 */ ED_UNASSIGNED, /* M-^F */
200 1.11 lukem /* 135 */ ED_UNASSIGNED, /* M-^G */
201 1.11 lukem /* 136 */ ED_DELETE_PREV_WORD, /* M-^H */
202 1.11 lukem /* 137 */ ED_UNASSIGNED, /* M-^I */
203 1.11 lukem /* 138 */ ED_UNASSIGNED, /* M-^J */
204 1.11 lukem /* 139 */ ED_UNASSIGNED, /* M-^K */
205 1.11 lukem /* 140 */ ED_CLEAR_SCREEN, /* M-^L */
206 1.11 lukem /* 141 */ ED_UNASSIGNED, /* M-^M */
207 1.11 lukem /* 142 */ ED_UNASSIGNED, /* M-^N */
208 1.11 lukem /* 143 */ ED_UNASSIGNED, /* M-^O */
209 1.11 lukem /* 144 */ ED_UNASSIGNED, /* M-^P */
210 1.11 lukem /* 145 */ ED_UNASSIGNED, /* M-^Q */
211 1.11 lukem /* 146 */ ED_UNASSIGNED, /* M-^R */
212 1.11 lukem /* 147 */ ED_UNASSIGNED, /* M-^S */
213 1.11 lukem /* 148 */ ED_UNASSIGNED, /* M-^T */
214 1.11 lukem /* 149 */ ED_UNASSIGNED, /* M-^U */
215 1.11 lukem /* 150 */ ED_UNASSIGNED, /* M-^V */
216 1.11 lukem /* 151 */ ED_UNASSIGNED, /* M-^W */
217 1.11 lukem /* 152 */ ED_UNASSIGNED, /* M-^X */
218 1.11 lukem /* 153 */ ED_UNASSIGNED, /* M-^Y */
219 1.11 lukem /* 154 */ ED_UNASSIGNED, /* M-^Z */
220 1.11 lukem /* 155 */ ED_UNASSIGNED, /* M-^[ */
221 1.11 lukem /* 156 */ ED_UNASSIGNED, /* M-^\ */
222 1.11 lukem /* 157 */ ED_UNASSIGNED, /* M-^] */
223 1.11 lukem /* 158 */ ED_UNASSIGNED, /* M-^^ */
224 1.11 lukem /* 159 */ EM_COPY_PREV_WORD, /* M-^_ */
225 1.11 lukem /* 160 */ ED_UNASSIGNED, /* M-SPACE */
226 1.11 lukem /* 161 */ ED_UNASSIGNED, /* M-! */
227 1.11 lukem /* 162 */ ED_UNASSIGNED, /* M-" */
228 1.11 lukem /* 163 */ ED_UNASSIGNED, /* M-# */
229 1.11 lukem /* 164 */ ED_UNASSIGNED, /* M-$ */
230 1.11 lukem /* 165 */ ED_UNASSIGNED, /* M-% */
231 1.11 lukem /* 166 */ ED_UNASSIGNED, /* M-& */
232 1.11 lukem /* 167 */ ED_UNASSIGNED, /* M-' */
233 1.11 lukem /* 168 */ ED_UNASSIGNED, /* M-( */
234 1.11 lukem /* 169 */ ED_UNASSIGNED, /* M-) */
235 1.11 lukem /* 170 */ ED_UNASSIGNED, /* M-* */
236 1.11 lukem /* 171 */ ED_UNASSIGNED, /* M-+ */
237 1.11 lukem /* 172 */ ED_UNASSIGNED, /* M-, */
238 1.11 lukem /* 173 */ ED_UNASSIGNED, /* M-- */
239 1.11 lukem /* 174 */ ED_UNASSIGNED, /* M-. */
240 1.11 lukem /* 175 */ ED_UNASSIGNED, /* M-/ */
241 1.11 lukem /* 176 */ ED_ARGUMENT_DIGIT, /* M-0 */
242 1.11 lukem /* 177 */ ED_ARGUMENT_DIGIT, /* M-1 */
243 1.11 lukem /* 178 */ ED_ARGUMENT_DIGIT, /* M-2 */
244 1.11 lukem /* 179 */ ED_ARGUMENT_DIGIT, /* M-3 */
245 1.11 lukem /* 180 */ ED_ARGUMENT_DIGIT, /* M-4 */
246 1.11 lukem /* 181 */ ED_ARGUMENT_DIGIT, /* M-5 */
247 1.11 lukem /* 182 */ ED_ARGUMENT_DIGIT, /* M-6 */
248 1.11 lukem /* 183 */ ED_ARGUMENT_DIGIT, /* M-7 */
249 1.11 lukem /* 184 */ ED_ARGUMENT_DIGIT, /* M-8 */
250 1.11 lukem /* 185 */ ED_ARGUMENT_DIGIT, /* M-9 */
251 1.11 lukem /* 186 */ ED_UNASSIGNED, /* M-: */
252 1.11 lukem /* 187 */ ED_UNASSIGNED, /* M-; */
253 1.11 lukem /* 188 */ ED_UNASSIGNED, /* M-< */
254 1.11 lukem /* 189 */ ED_UNASSIGNED, /* M-= */
255 1.11 lukem /* 190 */ ED_UNASSIGNED, /* M-> */
256 1.11 lukem /* 191 */ ED_UNASSIGNED, /* M-? */
257 1.11 lukem /* 192 */ ED_UNASSIGNED, /* M-@ */
258 1.11 lukem /* 193 */ ED_UNASSIGNED, /* M-A */
259 1.11 lukem /* 194 */ ED_PREV_WORD, /* M-B */
260 1.11 lukem /* 195 */ EM_CAPITOL_CASE, /* M-C */
261 1.11 lukem /* 196 */ EM_DELETE_NEXT_WORD, /* M-D */
262 1.11 lukem /* 197 */ ED_UNASSIGNED, /* M-E */
263 1.11 lukem /* 198 */ EM_NEXT_WORD, /* M-F */
264 1.11 lukem /* 199 */ ED_UNASSIGNED, /* M-G */
265 1.11 lukem /* 200 */ ED_UNASSIGNED, /* M-H */
266 1.11 lukem /* 201 */ ED_UNASSIGNED, /* M-I */
267 1.11 lukem /* 202 */ ED_UNASSIGNED, /* M-J */
268 1.11 lukem /* 203 */ ED_UNASSIGNED, /* M-K */
269 1.11 lukem /* 204 */ EM_LOWER_CASE, /* M-L */
270 1.11 lukem /* 205 */ ED_UNASSIGNED, /* M-M */
271 1.11 lukem /* 206 */ ED_SEARCH_NEXT_HISTORY, /* M-N */
272 1.11 lukem /* 207 */ ED_SEQUENCE_LEAD_IN, /* M-O */
273 1.11 lukem /* 208 */ ED_SEARCH_PREV_HISTORY, /* M-P */
274 1.11 lukem /* 209 */ ED_UNASSIGNED, /* M-Q */
275 1.11 lukem /* 210 */ ED_UNASSIGNED, /* M-R */
276 1.11 lukem /* 211 */ ED_UNASSIGNED, /* M-S */
277 1.11 lukem /* 212 */ ED_UNASSIGNED, /* M-T */
278 1.11 lukem /* 213 */ EM_UPPER_CASE, /* M-U */
279 1.11 lukem /* 214 */ ED_UNASSIGNED, /* M-V */
280 1.11 lukem /* 215 */ EM_COPY_REGION, /* M-W */
281 1.11 lukem /* 216 */ ED_COMMAND, /* M-X */
282 1.11 lukem /* 217 */ ED_UNASSIGNED, /* M-Y */
283 1.11 lukem /* 218 */ ED_UNASSIGNED, /* M-Z */
284 1.11 lukem /* 219 */ ED_SEQUENCE_LEAD_IN, /* M-[ */
285 1.11 lukem /* 220 */ ED_UNASSIGNED, /* M-\ */
286 1.11 lukem /* 221 */ ED_UNASSIGNED, /* M-] */
287 1.11 lukem /* 222 */ ED_UNASSIGNED, /* M-^ */
288 1.11 lukem /* 223 */ ED_UNASSIGNED, /* M-_ */
289 1.11 lukem /* 223 */ ED_UNASSIGNED, /* M-` */
290 1.11 lukem /* 224 */ ED_UNASSIGNED, /* M-a */
291 1.11 lukem /* 225 */ ED_PREV_WORD, /* M-b */
292 1.11 lukem /* 226 */ EM_CAPITOL_CASE, /* M-c */
293 1.11 lukem /* 227 */ EM_DELETE_NEXT_WORD, /* M-d */
294 1.11 lukem /* 228 */ ED_UNASSIGNED, /* M-e */
295 1.11 lukem /* 229 */ EM_NEXT_WORD, /* M-f */
296 1.11 lukem /* 230 */ ED_UNASSIGNED, /* M-g */
297 1.11 lukem /* 231 */ ED_UNASSIGNED, /* M-h */
298 1.11 lukem /* 232 */ ED_UNASSIGNED, /* M-i */
299 1.11 lukem /* 233 */ ED_UNASSIGNED, /* M-j */
300 1.11 lukem /* 234 */ ED_UNASSIGNED, /* M-k */
301 1.11 lukem /* 235 */ EM_LOWER_CASE, /* M-l */
302 1.11 lukem /* 236 */ ED_UNASSIGNED, /* M-m */
303 1.11 lukem /* 237 */ ED_SEARCH_NEXT_HISTORY, /* M-n */
304 1.11 lukem /* 238 */ ED_UNASSIGNED, /* M-o */
305 1.11 lukem /* 239 */ ED_SEARCH_PREV_HISTORY, /* M-p */
306 1.11 lukem /* 240 */ ED_UNASSIGNED, /* M-q */
307 1.11 lukem /* 241 */ ED_UNASSIGNED, /* M-r */
308 1.11 lukem /* 242 */ ED_UNASSIGNED, /* M-s */
309 1.11 lukem /* 243 */ ED_UNASSIGNED, /* M-t */
310 1.11 lukem /* 244 */ EM_UPPER_CASE, /* M-u */
311 1.11 lukem /* 245 */ ED_UNASSIGNED, /* M-v */
312 1.11 lukem /* 246 */ EM_COPY_REGION, /* M-w */
313 1.11 lukem /* 247 */ ED_COMMAND, /* M-x */
314 1.11 lukem /* 248 */ ED_UNASSIGNED, /* M-y */
315 1.11 lukem /* 249 */ ED_UNASSIGNED, /* M-z */
316 1.11 lukem /* 250 */ ED_UNASSIGNED, /* M-{ */
317 1.11 lukem /* 251 */ ED_UNASSIGNED, /* M-| */
318 1.11 lukem /* 252 */ ED_UNASSIGNED, /* M-} */
319 1.11 lukem /* 253 */ ED_UNASSIGNED, /* M-~ */
320 1.11 lukem /* 254 */ ED_DELETE_PREV_WORD /* M-^? */
321 1.11 lukem /* 255 */
322 1.1 cgd };
323 1.1 cgd
324 1.11 lukem
325 1.1 cgd /*
326 1.1 cgd * keymap table for vi. Each index into above tbl; should be
327 1.1 cgd * N_KEYS entries long. Vi mode uses a sticky-extend to do command mode:
328 1.1 cgd * insert mode characters are in the normal keymap, and command mode
329 1.1 cgd * in the extended keymap.
330 1.1 cgd */
331 1.14 jdolecek private const el_action_t el_map_vi_insert[] = {
332 1.1 cgd #ifdef KSHVI
333 1.11 lukem /* 0 */ ED_UNASSIGNED, /* ^@ */
334 1.11 lukem /* 1 */ ED_INSERT, /* ^A */
335 1.11 lukem /* 2 */ ED_INSERT, /* ^B */
336 1.11 lukem /* 3 */ ED_INSERT, /* ^C */
337 1.11 lukem /* 4 */ VI_LIST_OR_EOF, /* ^D */
338 1.11 lukem /* 5 */ ED_INSERT, /* ^E */
339 1.11 lukem /* 6 */ ED_INSERT, /* ^F */
340 1.11 lukem /* 7 */ ED_INSERT, /* ^G */
341 1.11 lukem /* 8 */ VI_DELETE_PREV_CHAR, /* ^H */ /* BackSpace key */
342 1.11 lukem /* 9 */ ED_INSERT, /* ^I */ /* Tab Key */
343 1.11 lukem /* 10 */ ED_NEWLINE, /* ^J */
344 1.11 lukem /* 11 */ ED_INSERT, /* ^K */
345 1.11 lukem /* 12 */ ED_INSERT, /* ^L */
346 1.11 lukem /* 13 */ ED_NEWLINE, /* ^M */
347 1.11 lukem /* 14 */ ED_INSERT, /* ^N */
348 1.11 lukem /* 15 */ ED_INSERT, /* ^O */
349 1.11 lukem /* 16 */ ED_INSERT, /* ^P */
350 1.11 lukem /* 17 */ ED_TTY_START_OUTPUT, /* ^Q */
351 1.11 lukem /* 18 */ ED_INSERT, /* ^R */
352 1.11 lukem /* 19 */ ED_TTY_STOP_OUTPUT, /* ^S */
353 1.11 lukem /* 20 */ ED_INSERT, /* ^T */
354 1.11 lukem /* 21 */ VI_KILL_LINE_PREV, /* ^U */
355 1.11 lukem /* 22 */ ED_QUOTED_INSERT, /* ^V */
356 1.11 lukem /* 23 */ ED_DELETE_PREV_WORD, /* ^W */
357 1.11 lukem /* ED_DELETE_PREV_WORD: Only until strt edit pos */
358 1.11 lukem /* 24 */ ED_INSERT, /* ^X */
359 1.11 lukem /* 25 */ ED_INSERT, /* ^Y */
360 1.11 lukem /* 26 */ ED_INSERT, /* ^Z */
361 1.11 lukem /* 27 */ VI_COMMAND_MODE, /* ^[ */ /* [ Esc ] key */
362 1.11 lukem /* 28 */ ED_TTY_SIGQUIT, /* ^\ */
363 1.11 lukem /* 29 */ ED_INSERT, /* ^] */
364 1.11 lukem /* 30 */ ED_INSERT, /* ^^ */
365 1.11 lukem /* 31 */ ED_INSERT, /* ^_ */
366 1.1 cgd #else /* !KSHVI */
367 1.11 lukem /*
368 1.11 lukem * NOTE: These mappings do NOT Correspond well
369 1.11 lukem * to the KSH VI editing assignments.
370 1.11 lukem * On the other and they are convenient and
371 1.11 lukem * many people have have gotten used to them.
372 1.11 lukem */
373 1.11 lukem /* 0 */ ED_UNASSIGNED, /* ^@ */
374 1.11 lukem /* 1 */ ED_MOVE_TO_BEG, /* ^A */
375 1.11 lukem /* 2 */ ED_PREV_CHAR, /* ^B */
376 1.11 lukem /* 3 */ ED_TTY_SIGINT, /* ^C */
377 1.11 lukem /* 4 */ VI_LIST_OR_EOF, /* ^D */
378 1.11 lukem /* 5 */ ED_MOVE_TO_END, /* ^E */
379 1.11 lukem /* 6 */ ED_NEXT_CHAR, /* ^F */
380 1.11 lukem /* 7 */ ED_UNASSIGNED, /* ^G */
381 1.16 christos /* 8 */ VI_DELETE_PREV_CHAR, /* ^H */ /* BackSpace key */
382 1.11 lukem /* 9 */ ED_UNASSIGNED, /* ^I */ /* Tab Key */
383 1.11 lukem /* 10 */ ED_NEWLINE, /* ^J */
384 1.11 lukem /* 11 */ ED_KILL_LINE, /* ^K */
385 1.11 lukem /* 12 */ ED_CLEAR_SCREEN, /* ^L */
386 1.11 lukem /* 13 */ ED_NEWLINE, /* ^M */
387 1.11 lukem /* 14 */ ED_NEXT_HISTORY, /* ^N */
388 1.11 lukem /* 15 */ ED_TTY_FLUSH_OUTPUT, /* ^O */
389 1.11 lukem /* 16 */ ED_PREV_HISTORY, /* ^P */
390 1.11 lukem /* 17 */ ED_TTY_START_OUTPUT, /* ^Q */
391 1.11 lukem /* 18 */ ED_REDISPLAY, /* ^R */
392 1.11 lukem /* 19 */ ED_TTY_STOP_OUTPUT, /* ^S */
393 1.11 lukem /* 20 */ ED_TRANSPOSE_CHARS, /* ^T */
394 1.11 lukem /* 21 */ VI_KILL_LINE_PREV, /* ^U */
395 1.11 lukem /* 22 */ ED_QUOTED_INSERT, /* ^V */
396 1.11 lukem /* 23 */ ED_DELETE_PREV_WORD, /* ^W */
397 1.11 lukem /* 24 */ ED_UNASSIGNED, /* ^X */
398 1.11 lukem /* 25 */ ED_TTY_DSUSP, /* ^Y */
399 1.11 lukem /* 26 */ ED_TTY_SIGTSTP, /* ^Z */
400 1.11 lukem /* 27 */ VI_COMMAND_MODE, /* ^[ */
401 1.11 lukem /* 28 */ ED_TTY_SIGQUIT, /* ^\ */
402 1.11 lukem /* 29 */ ED_UNASSIGNED, /* ^] */
403 1.11 lukem /* 30 */ ED_UNASSIGNED, /* ^^ */
404 1.11 lukem /* 31 */ ED_UNASSIGNED, /* ^_ */
405 1.1 cgd #endif /* KSHVI */
406 1.11 lukem /* 32 */ ED_INSERT, /* SPACE */
407 1.11 lukem /* 33 */ ED_INSERT, /* ! */
408 1.11 lukem /* 34 */ ED_INSERT, /* " */
409 1.11 lukem /* 35 */ ED_INSERT, /* # */
410 1.11 lukem /* 36 */ ED_INSERT, /* $ */
411 1.11 lukem /* 37 */ ED_INSERT, /* % */
412 1.11 lukem /* 38 */ ED_INSERT, /* & */
413 1.11 lukem /* 39 */ ED_INSERT, /* ' */
414 1.11 lukem /* 40 */ ED_INSERT, /* ( */
415 1.11 lukem /* 41 */ ED_INSERT, /* ) */
416 1.11 lukem /* 42 */ ED_INSERT, /* * */
417 1.11 lukem /* 43 */ ED_INSERT, /* + */
418 1.11 lukem /* 44 */ ED_INSERT, /* , */
419 1.11 lukem /* 45 */ ED_INSERT, /* - */
420 1.11 lukem /* 46 */ ED_INSERT, /* . */
421 1.11 lukem /* 47 */ ED_INSERT, /* / */
422 1.11 lukem /* 48 */ ED_INSERT, /* 0 */
423 1.11 lukem /* 49 */ ED_INSERT, /* 1 */
424 1.11 lukem /* 50 */ ED_INSERT, /* 2 */
425 1.11 lukem /* 51 */ ED_INSERT, /* 3 */
426 1.11 lukem /* 52 */ ED_INSERT, /* 4 */
427 1.11 lukem /* 53 */ ED_INSERT, /* 5 */
428 1.11 lukem /* 54 */ ED_INSERT, /* 6 */
429 1.11 lukem /* 55 */ ED_INSERT, /* 7 */
430 1.11 lukem /* 56 */ ED_INSERT, /* 8 */
431 1.11 lukem /* 57 */ ED_INSERT, /* 9 */
432 1.11 lukem /* 58 */ ED_INSERT, /* : */
433 1.11 lukem /* 59 */ ED_INSERT, /* ; */
434 1.11 lukem /* 60 */ ED_INSERT, /* < */
435 1.11 lukem /* 61 */ ED_INSERT, /* = */
436 1.11 lukem /* 62 */ ED_INSERT, /* > */
437 1.11 lukem /* 63 */ ED_INSERT, /* ? */
438 1.11 lukem /* 64 */ ED_INSERT, /* @ */
439 1.11 lukem /* 65 */ ED_INSERT, /* A */
440 1.11 lukem /* 66 */ ED_INSERT, /* B */
441 1.11 lukem /* 67 */ ED_INSERT, /* C */
442 1.11 lukem /* 68 */ ED_INSERT, /* D */
443 1.11 lukem /* 69 */ ED_INSERT, /* E */
444 1.11 lukem /* 70 */ ED_INSERT, /* F */
445 1.11 lukem /* 71 */ ED_INSERT, /* G */
446 1.11 lukem /* 72 */ ED_INSERT, /* H */
447 1.11 lukem /* 73 */ ED_INSERT, /* I */
448 1.11 lukem /* 74 */ ED_INSERT, /* J */
449 1.11 lukem /* 75 */ ED_INSERT, /* K */
450 1.11 lukem /* 76 */ ED_INSERT, /* L */
451 1.11 lukem /* 77 */ ED_INSERT, /* M */
452 1.11 lukem /* 78 */ ED_INSERT, /* N */
453 1.11 lukem /* 79 */ ED_INSERT, /* O */
454 1.11 lukem /* 80 */ ED_INSERT, /* P */
455 1.11 lukem /* 81 */ ED_INSERT, /* Q */
456 1.11 lukem /* 82 */ ED_INSERT, /* R */
457 1.11 lukem /* 83 */ ED_INSERT, /* S */
458 1.11 lukem /* 84 */ ED_INSERT, /* T */
459 1.11 lukem /* 85 */ ED_INSERT, /* U */
460 1.11 lukem /* 86 */ ED_INSERT, /* V */
461 1.11 lukem /* 87 */ ED_INSERT, /* W */
462 1.11 lukem /* 88 */ ED_INSERT, /* X */
463 1.11 lukem /* 89 */ ED_INSERT, /* Y */
464 1.11 lukem /* 90 */ ED_INSERT, /* Z */
465 1.11 lukem /* 91 */ ED_INSERT, /* [ */
466 1.11 lukem /* 92 */ ED_INSERT, /* \ */
467 1.11 lukem /* 93 */ ED_INSERT, /* ] */
468 1.11 lukem /* 94 */ ED_INSERT, /* ^ */
469 1.11 lukem /* 95 */ ED_INSERT, /* _ */
470 1.11 lukem /* 96 */ ED_INSERT, /* ` */
471 1.11 lukem /* 97 */ ED_INSERT, /* a */
472 1.11 lukem /* 98 */ ED_INSERT, /* b */
473 1.11 lukem /* 99 */ ED_INSERT, /* c */
474 1.11 lukem /* 100 */ ED_INSERT, /* d */
475 1.11 lukem /* 101 */ ED_INSERT, /* e */
476 1.11 lukem /* 102 */ ED_INSERT, /* f */
477 1.11 lukem /* 103 */ ED_INSERT, /* g */
478 1.11 lukem /* 104 */ ED_INSERT, /* h */
479 1.11 lukem /* 105 */ ED_INSERT, /* i */
480 1.11 lukem /* 106 */ ED_INSERT, /* j */
481 1.11 lukem /* 107 */ ED_INSERT, /* k */
482 1.11 lukem /* 108 */ ED_INSERT, /* l */
483 1.11 lukem /* 109 */ ED_INSERT, /* m */
484 1.11 lukem /* 110 */ ED_INSERT, /* n */
485 1.11 lukem /* 111 */ ED_INSERT, /* o */
486 1.11 lukem /* 112 */ ED_INSERT, /* p */
487 1.11 lukem /* 113 */ ED_INSERT, /* q */
488 1.11 lukem /* 114 */ ED_INSERT, /* r */
489 1.11 lukem /* 115 */ ED_INSERT, /* s */
490 1.11 lukem /* 116 */ ED_INSERT, /* t */
491 1.11 lukem /* 117 */ ED_INSERT, /* u */
492 1.11 lukem /* 118 */ ED_INSERT, /* v */
493 1.11 lukem /* 119 */ ED_INSERT, /* w */
494 1.11 lukem /* 120 */ ED_INSERT, /* x */
495 1.11 lukem /* 121 */ ED_INSERT, /* y */
496 1.11 lukem /* 122 */ ED_INSERT, /* z */
497 1.11 lukem /* 123 */ ED_INSERT, /* { */
498 1.11 lukem /* 124 */ ED_INSERT, /* | */
499 1.11 lukem /* 125 */ ED_INSERT, /* } */
500 1.11 lukem /* 126 */ ED_INSERT, /* ~ */
501 1.16 christos /* 127 */ VI_DELETE_PREV_CHAR, /* ^? */
502 1.18 christos /* 128 */ ED_INSERT, /* M-^@ */
503 1.18 christos /* 129 */ ED_INSERT, /* M-^A */
504 1.18 christos /* 130 */ ED_INSERT, /* M-^B */
505 1.18 christos /* 131 */ ED_INSERT, /* M-^C */
506 1.18 christos /* 132 */ ED_INSERT, /* M-^D */
507 1.18 christos /* 133 */ ED_INSERT, /* M-^E */
508 1.18 christos /* 134 */ ED_INSERT, /* M-^F */
509 1.18 christos /* 135 */ ED_INSERT, /* M-^G */
510 1.18 christos /* 136 */ ED_INSERT, /* M-^H */
511 1.18 christos /* 137 */ ED_INSERT, /* M-^I */
512 1.18 christos /* 138 */ ED_INSERT, /* M-^J */
513 1.18 christos /* 139 */ ED_INSERT, /* M-^K */
514 1.18 christos /* 140 */ ED_INSERT, /* M-^L */
515 1.18 christos /* 141 */ ED_INSERT, /* M-^M */
516 1.18 christos /* 142 */ ED_INSERT, /* M-^N */
517 1.18 christos /* 143 */ ED_INSERT, /* M-^O */
518 1.18 christos /* 144 */ ED_INSERT, /* M-^P */
519 1.18 christos /* 145 */ ED_INSERT, /* M-^Q */
520 1.18 christos /* 146 */ ED_INSERT, /* M-^R */
521 1.18 christos /* 147 */ ED_INSERT, /* M-^S */
522 1.18 christos /* 148 */ ED_INSERT, /* M-^T */
523 1.18 christos /* 149 */ ED_INSERT, /* M-^U */
524 1.18 christos /* 150 */ ED_INSERT, /* M-^V */
525 1.18 christos /* 151 */ ED_INSERT, /* M-^W */
526 1.18 christos /* 152 */ ED_INSERT, /* M-^X */
527 1.18 christos /* 153 */ ED_INSERT, /* M-^Y */
528 1.18 christos /* 154 */ ED_INSERT, /* M-^Z */
529 1.18 christos /* 155 */ ED_INSERT, /* M-^[ */
530 1.18 christos /* 156 */ ED_INSERT, /* M-^\ */
531 1.18 christos /* 157 */ ED_INSERT, /* M-^] */
532 1.18 christos /* 158 */ ED_INSERT, /* M-^^ */
533 1.18 christos /* 159 */ ED_INSERT, /* M-^_ */
534 1.18 christos /* 160 */ ED_INSERT, /* M-SPACE */
535 1.18 christos /* 161 */ ED_INSERT, /* M-! */
536 1.18 christos /* 162 */ ED_INSERT, /* M-" */
537 1.18 christos /* 163 */ ED_INSERT, /* M-# */
538 1.18 christos /* 164 */ ED_INSERT, /* M-$ */
539 1.18 christos /* 165 */ ED_INSERT, /* M-% */
540 1.18 christos /* 166 */ ED_INSERT, /* M-& */
541 1.18 christos /* 167 */ ED_INSERT, /* M-' */
542 1.18 christos /* 168 */ ED_INSERT, /* M-( */
543 1.18 christos /* 169 */ ED_INSERT, /* M-) */
544 1.18 christos /* 170 */ ED_INSERT, /* M-* */
545 1.18 christos /* 171 */ ED_INSERT, /* M-+ */
546 1.18 christos /* 172 */ ED_INSERT, /* M-, */
547 1.18 christos /* 173 */ ED_INSERT, /* M-- */
548 1.18 christos /* 174 */ ED_INSERT, /* M-. */
549 1.18 christos /* 175 */ ED_INSERT, /* M-/ */
550 1.18 christos /* 176 */ ED_INSERT, /* M-0 */
551 1.18 christos /* 177 */ ED_INSERT, /* M-1 */
552 1.18 christos /* 178 */ ED_INSERT, /* M-2 */
553 1.18 christos /* 179 */ ED_INSERT, /* M-3 */
554 1.18 christos /* 180 */ ED_INSERT, /* M-4 */
555 1.18 christos /* 181 */ ED_INSERT, /* M-5 */
556 1.18 christos /* 182 */ ED_INSERT, /* M-6 */
557 1.18 christos /* 183 */ ED_INSERT, /* M-7 */
558 1.18 christos /* 184 */ ED_INSERT, /* M-8 */
559 1.18 christos /* 185 */ ED_INSERT, /* M-9 */
560 1.18 christos /* 186 */ ED_INSERT, /* M-: */
561 1.18 christos /* 187 */ ED_INSERT, /* M-; */
562 1.18 christos /* 188 */ ED_INSERT, /* M-< */
563 1.18 christos /* 189 */ ED_INSERT, /* M-= */
564 1.18 christos /* 190 */ ED_INSERT, /* M-> */
565 1.18 christos /* 191 */ ED_INSERT, /* M-? */
566 1.18 christos /* 192 */ ED_INSERT, /* M-@ */
567 1.18 christos /* 193 */ ED_INSERT, /* M-A */
568 1.18 christos /* 194 */ ED_INSERT, /* M-B */
569 1.18 christos /* 195 */ ED_INSERT, /* M-C */
570 1.18 christos /* 196 */ ED_INSERT, /* M-D */
571 1.18 christos /* 197 */ ED_INSERT, /* M-E */
572 1.18 christos /* 198 */ ED_INSERT, /* M-F */
573 1.18 christos /* 199 */ ED_INSERT, /* M-G */
574 1.18 christos /* 200 */ ED_INSERT, /* M-H */
575 1.18 christos /* 201 */ ED_INSERT, /* M-I */
576 1.18 christos /* 202 */ ED_INSERT, /* M-J */
577 1.18 christos /* 203 */ ED_INSERT, /* M-K */
578 1.18 christos /* 204 */ ED_INSERT, /* M-L */
579 1.18 christos /* 205 */ ED_INSERT, /* M-M */
580 1.18 christos /* 206 */ ED_INSERT, /* M-N */
581 1.18 christos /* 207 */ ED_INSERT, /* M-O */
582 1.18 christos /* 208 */ ED_INSERT, /* M-P */
583 1.18 christos /* 209 */ ED_INSERT, /* M-Q */
584 1.18 christos /* 210 */ ED_INSERT, /* M-R */
585 1.18 christos /* 211 */ ED_INSERT, /* M-S */
586 1.18 christos /* 212 */ ED_INSERT, /* M-T */
587 1.18 christos /* 213 */ ED_INSERT, /* M-U */
588 1.18 christos /* 214 */ ED_INSERT, /* M-V */
589 1.18 christos /* 215 */ ED_INSERT, /* M-W */
590 1.18 christos /* 216 */ ED_INSERT, /* M-X */
591 1.18 christos /* 217 */ ED_INSERT, /* M-Y */
592 1.18 christos /* 218 */ ED_INSERT, /* M-Z */
593 1.18 christos /* 219 */ ED_INSERT, /* M-[ */
594 1.18 christos /* 220 */ ED_INSERT, /* M-\ */
595 1.18 christos /* 221 */ ED_INSERT, /* M-] */
596 1.18 christos /* 222 */ ED_INSERT, /* M-^ */
597 1.18 christos /* 223 */ ED_INSERT, /* M-_ */
598 1.18 christos /* 224 */ ED_INSERT, /* M-` */
599 1.18 christos /* 225 */ ED_INSERT, /* M-a */
600 1.18 christos /* 226 */ ED_INSERT, /* M-b */
601 1.18 christos /* 227 */ ED_INSERT, /* M-c */
602 1.18 christos /* 228 */ ED_INSERT, /* M-d */
603 1.18 christos /* 229 */ ED_INSERT, /* M-e */
604 1.18 christos /* 230 */ ED_INSERT, /* M-f */
605 1.18 christos /* 231 */ ED_INSERT, /* M-g */
606 1.18 christos /* 232 */ ED_INSERT, /* M-h */
607 1.18 christos /* 233 */ ED_INSERT, /* M-i */
608 1.18 christos /* 234 */ ED_INSERT, /* M-j */
609 1.18 christos /* 235 */ ED_INSERT, /* M-k */
610 1.18 christos /* 236 */ ED_INSERT, /* M-l */
611 1.18 christos /* 237 */ ED_INSERT, /* M-m */
612 1.18 christos /* 238 */ ED_INSERT, /* M-n */
613 1.18 christos /* 239 */ ED_INSERT, /* M-o */
614 1.18 christos /* 240 */ ED_INSERT, /* M-p */
615 1.18 christos /* 241 */ ED_INSERT, /* M-q */
616 1.18 christos /* 242 */ ED_INSERT, /* M-r */
617 1.18 christos /* 243 */ ED_INSERT, /* M-s */
618 1.18 christos /* 244 */ ED_INSERT, /* M-t */
619 1.18 christos /* 245 */ ED_INSERT, /* M-u */
620 1.18 christos /* 246 */ ED_INSERT, /* M-v */
621 1.18 christos /* 247 */ ED_INSERT, /* M-w */
622 1.18 christos /* 248 */ ED_INSERT, /* M-x */
623 1.18 christos /* 249 */ ED_INSERT, /* M-y */
624 1.18 christos /* 250 */ ED_INSERT, /* M-z */
625 1.18 christos /* 251 */ ED_INSERT, /* M-{ */
626 1.18 christos /* 252 */ ED_INSERT, /* M-| */
627 1.18 christos /* 253 */ ED_INSERT, /* M-} */
628 1.18 christos /* 254 */ ED_INSERT, /* M-~ */
629 1.18 christos /* 255 */ ED_INSERT /* M-^? */
630 1.1 cgd };
631 1.1 cgd
632 1.14 jdolecek private const el_action_t el_map_vi_command[] = {
633 1.11 lukem /* 0 */ ED_UNASSIGNED, /* ^@ */
634 1.11 lukem /* 1 */ ED_MOVE_TO_BEG, /* ^A */
635 1.11 lukem /* 2 */ ED_UNASSIGNED, /* ^B */
636 1.11 lukem /* 3 */ ED_TTY_SIGINT, /* ^C */
637 1.11 lukem /* 4 */ ED_UNASSIGNED, /* ^D */
638 1.11 lukem /* 5 */ ED_MOVE_TO_END, /* ^E */
639 1.11 lukem /* 6 */ ED_UNASSIGNED, /* ^F */
640 1.11 lukem /* 7 */ ED_UNASSIGNED, /* ^G */
641 1.16 christos /* 8 */ ED_DELETE_PREV_CHAR, /* ^H */
642 1.11 lukem /* 9 */ ED_UNASSIGNED, /* ^I */
643 1.11 lukem /* 10 */ ED_NEWLINE, /* ^J */
644 1.11 lukem /* 11 */ ED_KILL_LINE, /* ^K */
645 1.11 lukem /* 12 */ ED_CLEAR_SCREEN, /* ^L */
646 1.11 lukem /* 13 */ ED_NEWLINE, /* ^M */
647 1.11 lukem /* 14 */ ED_NEXT_HISTORY, /* ^N */
648 1.11 lukem /* 15 */ ED_TTY_FLUSH_OUTPUT, /* ^O */
649 1.11 lukem /* 16 */ ED_PREV_HISTORY, /* ^P */
650 1.11 lukem /* 17 */ ED_TTY_START_OUTPUT, /* ^Q */
651 1.11 lukem /* 18 */ ED_REDISPLAY, /* ^R */
652 1.11 lukem /* 19 */ ED_TTY_STOP_OUTPUT, /* ^S */
653 1.11 lukem /* 20 */ ED_UNASSIGNED, /* ^T */
654 1.11 lukem /* 21 */ VI_KILL_LINE_PREV, /* ^U */
655 1.11 lukem /* 22 */ ED_UNASSIGNED, /* ^V */
656 1.11 lukem /* 23 */ ED_DELETE_PREV_WORD, /* ^W */
657 1.11 lukem /* 24 */ ED_UNASSIGNED, /* ^X */
658 1.11 lukem /* 25 */ ED_UNASSIGNED, /* ^Y */
659 1.11 lukem /* 26 */ ED_UNASSIGNED, /* ^Z */
660 1.11 lukem /* 27 */ EM_META_NEXT, /* ^[ */
661 1.11 lukem /* 28 */ ED_TTY_SIGQUIT, /* ^\ */
662 1.11 lukem /* 29 */ ED_UNASSIGNED, /* ^] */
663 1.11 lukem /* 30 */ ED_UNASSIGNED, /* ^^ */
664 1.11 lukem /* 31 */ ED_UNASSIGNED, /* ^_ */
665 1.11 lukem /* 32 */ ED_NEXT_CHAR, /* SPACE */
666 1.11 lukem /* 33 */ ED_UNASSIGNED, /* ! */
667 1.11 lukem /* 34 */ ED_UNASSIGNED, /* " */
668 1.18 christos /* 35 */ VI_COMMENT_OUT, /* # */
669 1.11 lukem /* 36 */ ED_MOVE_TO_END, /* $ */
670 1.17 christos /* 37 */ VI_MATCH, /* % */
671 1.11 lukem /* 38 */ ED_UNASSIGNED, /* & */
672 1.11 lukem /* 39 */ ED_UNASSIGNED, /* ' */
673 1.11 lukem /* 40 */ ED_UNASSIGNED, /* ( */
674 1.11 lukem /* 41 */ ED_UNASSIGNED, /* ) */
675 1.11 lukem /* 42 */ ED_UNASSIGNED, /* * */
676 1.11 lukem /* 43 */ ED_NEXT_HISTORY, /* + */
677 1.11 lukem /* 44 */ VI_REPEAT_PREV_CHAR, /* , */
678 1.11 lukem /* 45 */ ED_PREV_HISTORY, /* - */
679 1.18 christos /* 46 */ VI_REDO, /* . */
680 1.11 lukem /* 47 */ VI_SEARCH_PREV, /* / */
681 1.11 lukem /* 48 */ VI_ZERO, /* 0 */
682 1.11 lukem /* 49 */ ED_ARGUMENT_DIGIT, /* 1 */
683 1.11 lukem /* 50 */ ED_ARGUMENT_DIGIT, /* 2 */
684 1.11 lukem /* 51 */ ED_ARGUMENT_DIGIT, /* 3 */
685 1.11 lukem /* 52 */ ED_ARGUMENT_DIGIT, /* 4 */
686 1.11 lukem /* 53 */ ED_ARGUMENT_DIGIT, /* 5 */
687 1.11 lukem /* 54 */ ED_ARGUMENT_DIGIT, /* 6 */
688 1.11 lukem /* 55 */ ED_ARGUMENT_DIGIT, /* 7 */
689 1.11 lukem /* 56 */ ED_ARGUMENT_DIGIT, /* 8 */
690 1.11 lukem /* 57 */ ED_ARGUMENT_DIGIT, /* 9 */
691 1.11 lukem /* 58 */ ED_COMMAND, /* : */
692 1.11 lukem /* 59 */ VI_REPEAT_NEXT_CHAR, /* ; */
693 1.11 lukem /* 60 */ ED_UNASSIGNED, /* < */
694 1.11 lukem /* 61 */ ED_UNASSIGNED, /* = */
695 1.11 lukem /* 62 */ ED_UNASSIGNED, /* > */
696 1.11 lukem /* 63 */ VI_SEARCH_NEXT, /* ? */
697 1.18 christos /* 64 */ VI_ALIAS, /* @ */
698 1.11 lukem /* 65 */ VI_ADD_AT_EOL, /* A */
699 1.16 christos /* 66 */ VI_PREV_BIG_WORD, /* B */
700 1.11 lukem /* 67 */ VI_CHANGE_TO_EOL, /* C */
701 1.11 lukem /* 68 */ ED_KILL_LINE, /* D */
702 1.16 christos /* 69 */ VI_END_BIG_WORD, /* E */
703 1.11 lukem /* 70 */ VI_PREV_CHAR, /* F */
704 1.18 christos /* 71 */ VI_TO_HISTORY_LINE, /* G */
705 1.11 lukem /* 72 */ ED_UNASSIGNED, /* H */
706 1.11 lukem /* 73 */ VI_INSERT_AT_BOL, /* I */
707 1.11 lukem /* 74 */ ED_SEARCH_NEXT_HISTORY, /* J */
708 1.11 lukem /* 75 */ ED_SEARCH_PREV_HISTORY, /* K */
709 1.11 lukem /* 76 */ ED_UNASSIGNED, /* L */
710 1.11 lukem /* 77 */ ED_UNASSIGNED, /* M */
711 1.11 lukem /* 78 */ VI_REPEAT_SEARCH_PREV, /* N */
712 1.11 lukem /* 79 */ ED_SEQUENCE_LEAD_IN, /* O */
713 1.11 lukem /* 80 */ VI_PASTE_PREV, /* P */
714 1.11 lukem /* 81 */ ED_UNASSIGNED, /* Q */
715 1.11 lukem /* 82 */ VI_REPLACE_MODE, /* R */
716 1.11 lukem /* 83 */ VI_SUBSTITUTE_LINE, /* S */
717 1.11 lukem /* 84 */ VI_TO_PREV_CHAR, /* T */
718 1.18 christos /* 85 */ VI_UNDO_LINE, /* U */
719 1.11 lukem /* 86 */ ED_UNASSIGNED, /* V */
720 1.16 christos /* 87 */ VI_NEXT_BIG_WORD, /* W */
721 1.11 lukem /* 88 */ ED_DELETE_PREV_CHAR, /* X */
722 1.18 christos /* 89 */ VI_YANK_END, /* Y */
723 1.11 lukem /* 90 */ ED_UNASSIGNED, /* Z */
724 1.11 lukem /* 91 */ ED_SEQUENCE_LEAD_IN, /* [ */
725 1.11 lukem /* 92 */ ED_UNASSIGNED, /* \ */
726 1.11 lukem /* 93 */ ED_UNASSIGNED, /* ] */
727 1.11 lukem /* 94 */ ED_MOVE_TO_BEG, /* ^ */
728 1.18 christos /* 95 */ VI_HISTORY_WORD, /* _ */
729 1.11 lukem /* 96 */ ED_UNASSIGNED, /* ` */
730 1.11 lukem /* 97 */ VI_ADD, /* a */
731 1.11 lukem /* 98 */ VI_PREV_WORD, /* b */
732 1.11 lukem /* 99 */ VI_CHANGE_META, /* c */
733 1.11 lukem /* 100 */ VI_DELETE_META, /* d */
734 1.11 lukem /* 101 */ VI_END_WORD, /* e */
735 1.11 lukem /* 102 */ VI_NEXT_CHAR, /* f */
736 1.11 lukem /* 103 */ ED_UNASSIGNED, /* g */
737 1.11 lukem /* 104 */ ED_PREV_CHAR, /* h */
738 1.11 lukem /* 105 */ VI_INSERT, /* i */
739 1.11 lukem /* 106 */ ED_NEXT_HISTORY, /* j */
740 1.11 lukem /* 107 */ ED_PREV_HISTORY, /* k */
741 1.11 lukem /* 108 */ ED_NEXT_CHAR, /* l */
742 1.11 lukem /* 109 */ ED_UNASSIGNED, /* m */
743 1.11 lukem /* 110 */ VI_REPEAT_SEARCH_NEXT, /* n */
744 1.11 lukem /* 111 */ ED_UNASSIGNED, /* o */
745 1.11 lukem /* 112 */ VI_PASTE_NEXT, /* p */
746 1.11 lukem /* 113 */ ED_UNASSIGNED, /* q */
747 1.11 lukem /* 114 */ VI_REPLACE_CHAR, /* r */
748 1.11 lukem /* 115 */ VI_SUBSTITUTE_CHAR, /* s */
749 1.11 lukem /* 116 */ VI_TO_NEXT_CHAR, /* t */
750 1.11 lukem /* 117 */ VI_UNDO, /* u */
751 1.18 christos /* 118 */ VI_HISTEDIT, /* v */
752 1.11 lukem /* 119 */ VI_NEXT_WORD, /* w */
753 1.11 lukem /* 120 */ ED_DELETE_NEXT_CHAR, /* x */
754 1.18 christos /* 121 */ VI_YANK, /* y */
755 1.11 lukem /* 122 */ ED_UNASSIGNED, /* z */
756 1.11 lukem /* 123 */ ED_UNASSIGNED, /* { */
757 1.18 christos /* 124 */ VI_TO_COLUMN, /* | */
758 1.11 lukem /* 125 */ ED_UNASSIGNED, /* } */
759 1.11 lukem /* 126 */ VI_CHANGE_CASE, /* ~ */
760 1.11 lukem /* 127 */ ED_DELETE_PREV_CHAR, /* ^? */
761 1.11 lukem /* 128 */ ED_UNASSIGNED, /* M-^@ */
762 1.11 lukem /* 129 */ ED_UNASSIGNED, /* M-^A */
763 1.11 lukem /* 130 */ ED_UNASSIGNED, /* M-^B */
764 1.11 lukem /* 131 */ ED_UNASSIGNED, /* M-^C */
765 1.11 lukem /* 132 */ ED_UNASSIGNED, /* M-^D */
766 1.11 lukem /* 133 */ ED_UNASSIGNED, /* M-^E */
767 1.11 lukem /* 134 */ ED_UNASSIGNED, /* M-^F */
768 1.11 lukem /* 135 */ ED_UNASSIGNED, /* M-^G */
769 1.11 lukem /* 136 */ ED_UNASSIGNED, /* M-^H */
770 1.11 lukem /* 137 */ ED_UNASSIGNED, /* M-^I */
771 1.11 lukem /* 138 */ ED_UNASSIGNED, /* M-^J */
772 1.11 lukem /* 139 */ ED_UNASSIGNED, /* M-^K */
773 1.11 lukem /* 140 */ ED_UNASSIGNED, /* M-^L */
774 1.11 lukem /* 141 */ ED_UNASSIGNED, /* M-^M */
775 1.11 lukem /* 142 */ ED_UNASSIGNED, /* M-^N */
776 1.11 lukem /* 143 */ ED_UNASSIGNED, /* M-^O */
777 1.11 lukem /* 144 */ ED_UNASSIGNED, /* M-^P */
778 1.11 lukem /* 145 */ ED_UNASSIGNED, /* M-^Q */
779 1.11 lukem /* 146 */ ED_UNASSIGNED, /* M-^R */
780 1.11 lukem /* 147 */ ED_UNASSIGNED, /* M-^S */
781 1.11 lukem /* 148 */ ED_UNASSIGNED, /* M-^T */
782 1.11 lukem /* 149 */ ED_UNASSIGNED, /* M-^U */
783 1.11 lukem /* 150 */ ED_UNASSIGNED, /* M-^V */
784 1.11 lukem /* 151 */ ED_UNASSIGNED, /* M-^W */
785 1.11 lukem /* 152 */ ED_UNASSIGNED, /* M-^X */
786 1.11 lukem /* 153 */ ED_UNASSIGNED, /* M-^Y */
787 1.11 lukem /* 154 */ ED_UNASSIGNED, /* M-^Z */
788 1.11 lukem /* 155 */ ED_UNASSIGNED, /* M-^[ */
789 1.11 lukem /* 156 */ ED_UNASSIGNED, /* M-^\ */
790 1.11 lukem /* 157 */ ED_UNASSIGNED, /* M-^] */
791 1.11 lukem /* 158 */ ED_UNASSIGNED, /* M-^^ */
792 1.11 lukem /* 159 */ ED_UNASSIGNED, /* M-^_ */
793 1.11 lukem /* 160 */ ED_UNASSIGNED, /* M-SPACE */
794 1.11 lukem /* 161 */ ED_UNASSIGNED, /* M-! */
795 1.11 lukem /* 162 */ ED_UNASSIGNED, /* M-" */
796 1.11 lukem /* 163 */ ED_UNASSIGNED, /* M-# */
797 1.11 lukem /* 164 */ ED_UNASSIGNED, /* M-$ */
798 1.11 lukem /* 165 */ ED_UNASSIGNED, /* M-% */
799 1.11 lukem /* 166 */ ED_UNASSIGNED, /* M-& */
800 1.11 lukem /* 167 */ ED_UNASSIGNED, /* M-' */
801 1.11 lukem /* 168 */ ED_UNASSIGNED, /* M-( */
802 1.11 lukem /* 169 */ ED_UNASSIGNED, /* M-) */
803 1.11 lukem /* 170 */ ED_UNASSIGNED, /* M-* */
804 1.11 lukem /* 171 */ ED_UNASSIGNED, /* M-+ */
805 1.11 lukem /* 172 */ ED_UNASSIGNED, /* M-, */
806 1.11 lukem /* 173 */ ED_UNASSIGNED, /* M-- */
807 1.11 lukem /* 174 */ ED_UNASSIGNED, /* M-. */
808 1.11 lukem /* 175 */ ED_UNASSIGNED, /* M-/ */
809 1.11 lukem /* 176 */ ED_UNASSIGNED, /* M-0 */
810 1.11 lukem /* 177 */ ED_UNASSIGNED, /* M-1 */
811 1.11 lukem /* 178 */ ED_UNASSIGNED, /* M-2 */
812 1.11 lukem /* 179 */ ED_UNASSIGNED, /* M-3 */
813 1.11 lukem /* 180 */ ED_UNASSIGNED, /* M-4 */
814 1.11 lukem /* 181 */ ED_UNASSIGNED, /* M-5 */
815 1.11 lukem /* 182 */ ED_UNASSIGNED, /* M-6 */
816 1.11 lukem /* 183 */ ED_UNASSIGNED, /* M-7 */
817 1.11 lukem /* 184 */ ED_UNASSIGNED, /* M-8 */
818 1.11 lukem /* 185 */ ED_UNASSIGNED, /* M-9 */
819 1.11 lukem /* 186 */ ED_UNASSIGNED, /* M-: */
820 1.11 lukem /* 187 */ ED_UNASSIGNED, /* M-; */
821 1.11 lukem /* 188 */ ED_UNASSIGNED, /* M-< */
822 1.11 lukem /* 189 */ ED_UNASSIGNED, /* M-= */
823 1.11 lukem /* 190 */ ED_UNASSIGNED, /* M-> */
824 1.11 lukem /* 191 */ ED_UNASSIGNED, /* M-? */
825 1.11 lukem /* 192 */ ED_UNASSIGNED, /* M-@ */
826 1.11 lukem /* 193 */ ED_UNASSIGNED, /* M-A */
827 1.11 lukem /* 194 */ ED_UNASSIGNED, /* M-B */
828 1.11 lukem /* 195 */ ED_UNASSIGNED, /* M-C */
829 1.11 lukem /* 196 */ ED_UNASSIGNED, /* M-D */
830 1.11 lukem /* 197 */ ED_UNASSIGNED, /* M-E */
831 1.11 lukem /* 198 */ ED_UNASSIGNED, /* M-F */
832 1.11 lukem /* 199 */ ED_UNASSIGNED, /* M-G */
833 1.11 lukem /* 200 */ ED_UNASSIGNED, /* M-H */
834 1.11 lukem /* 201 */ ED_UNASSIGNED, /* M-I */
835 1.11 lukem /* 202 */ ED_UNASSIGNED, /* M-J */
836 1.11 lukem /* 203 */ ED_UNASSIGNED, /* M-K */
837 1.11 lukem /* 204 */ ED_UNASSIGNED, /* M-L */
838 1.11 lukem /* 205 */ ED_UNASSIGNED, /* M-M */
839 1.11 lukem /* 206 */ ED_UNASSIGNED, /* M-N */
840 1.11 lukem /* 207 */ ED_SEQUENCE_LEAD_IN, /* M-O */
841 1.11 lukem /* 208 */ ED_UNASSIGNED, /* M-P */
842 1.11 lukem /* 209 */ ED_UNASSIGNED, /* M-Q */
843 1.11 lukem /* 210 */ ED_UNASSIGNED, /* M-R */
844 1.11 lukem /* 211 */ ED_UNASSIGNED, /* M-S */
845 1.11 lukem /* 212 */ ED_UNASSIGNED, /* M-T */
846 1.11 lukem /* 213 */ ED_UNASSIGNED, /* M-U */
847 1.11 lukem /* 214 */ ED_UNASSIGNED, /* M-V */
848 1.11 lukem /* 215 */ ED_UNASSIGNED, /* M-W */
849 1.11 lukem /* 216 */ ED_UNASSIGNED, /* M-X */
850 1.11 lukem /* 217 */ ED_UNASSIGNED, /* M-Y */
851 1.11 lukem /* 218 */ ED_UNASSIGNED, /* M-Z */
852 1.11 lukem /* 219 */ ED_SEQUENCE_LEAD_IN, /* M-[ */
853 1.11 lukem /* 220 */ ED_UNASSIGNED, /* M-\ */
854 1.11 lukem /* 221 */ ED_UNASSIGNED, /* M-] */
855 1.11 lukem /* 222 */ ED_UNASSIGNED, /* M-^ */
856 1.11 lukem /* 223 */ ED_UNASSIGNED, /* M-_ */
857 1.11 lukem /* 224 */ ED_UNASSIGNED, /* M-` */
858 1.11 lukem /* 225 */ ED_UNASSIGNED, /* M-a */
859 1.11 lukem /* 226 */ ED_UNASSIGNED, /* M-b */
860 1.11 lukem /* 227 */ ED_UNASSIGNED, /* M-c */
861 1.11 lukem /* 228 */ ED_UNASSIGNED, /* M-d */
862 1.11 lukem /* 229 */ ED_UNASSIGNED, /* M-e */
863 1.11 lukem /* 230 */ ED_UNASSIGNED, /* M-f */
864 1.11 lukem /* 231 */ ED_UNASSIGNED, /* M-g */
865 1.11 lukem /* 232 */ ED_UNASSIGNED, /* M-h */
866 1.11 lukem /* 233 */ ED_UNASSIGNED, /* M-i */
867 1.11 lukem /* 234 */ ED_UNASSIGNED, /* M-j */
868 1.11 lukem /* 235 */ ED_UNASSIGNED, /* M-k */
869 1.11 lukem /* 236 */ ED_UNASSIGNED, /* M-l */
870 1.11 lukem /* 237 */ ED_UNASSIGNED, /* M-m */
871 1.11 lukem /* 238 */ ED_UNASSIGNED, /* M-n */
872 1.11 lukem /* 239 */ ED_UNASSIGNED, /* M-o */
873 1.11 lukem /* 240 */ ED_UNASSIGNED, /* M-p */
874 1.11 lukem /* 241 */ ED_UNASSIGNED, /* M-q */
875 1.11 lukem /* 242 */ ED_UNASSIGNED, /* M-r */
876 1.11 lukem /* 243 */ ED_UNASSIGNED, /* M-s */
877 1.11 lukem /* 244 */ ED_UNASSIGNED, /* M-t */
878 1.11 lukem /* 245 */ ED_UNASSIGNED, /* M-u */
879 1.11 lukem /* 246 */ ED_UNASSIGNED, /* M-v */
880 1.11 lukem /* 247 */ ED_UNASSIGNED, /* M-w */
881 1.11 lukem /* 248 */ ED_UNASSIGNED, /* M-x */
882 1.11 lukem /* 249 */ ED_UNASSIGNED, /* M-y */
883 1.11 lukem /* 250 */ ED_UNASSIGNED, /* M-z */
884 1.11 lukem /* 251 */ ED_UNASSIGNED, /* M-{ */
885 1.11 lukem /* 252 */ ED_UNASSIGNED, /* M-| */
886 1.11 lukem /* 253 */ ED_UNASSIGNED, /* M-} */
887 1.11 lukem /* 254 */ ED_UNASSIGNED, /* M-~ */
888 1.11 lukem /* 255 */ ED_UNASSIGNED /* M-^? */
889 1.1 cgd };
890 1.1 cgd
891 1.1 cgd
892 1.1 cgd /* map_init():
893 1.1 cgd * Initialize and allocate the maps
894 1.1 cgd */
895 1.1 cgd protected int
896 1.11 lukem map_init(EditLine *el)
897 1.1 cgd {
898 1.9 simonb
899 1.11 lukem /*
900 1.11 lukem * Make sure those are correct before starting.
901 1.11 lukem */
902 1.1 cgd #ifdef MAP_DEBUG
903 1.11 lukem if (sizeof(el_map_emacs) != N_KEYS * sizeof(el_action_t))
904 1.12 christos EL_ABORT((el->errfile, "Emacs map incorrect\n"));
905 1.11 lukem if (sizeof(el_map_vi_command) != N_KEYS * sizeof(el_action_t))
906 1.12 christos EL_ABORT((el->errfile, "Vi command map incorrect\n"));
907 1.11 lukem if (sizeof(el_map_vi_insert) != N_KEYS * sizeof(el_action_t))
908 1.12 christos EL_ABORT((el->errfile, "Vi insert map incorrect\n"));
909 1.1 cgd #endif
910 1.1 cgd
911 1.28 christos el->el_map.alt = el_malloc(sizeof(*el->el_map.alt) * N_KEYS);
912 1.13 christos if (el->el_map.alt == NULL)
913 1.29 christos return -1;
914 1.28 christos el->el_map.key = el_malloc(sizeof(*el->el_map.key) * N_KEYS);
915 1.13 christos if (el->el_map.key == NULL)
916 1.29 christos return -1;
917 1.11 lukem el->el_map.emacs = el_map_emacs;
918 1.11 lukem el->el_map.vic = el_map_vi_command;
919 1.11 lukem el->el_map.vii = el_map_vi_insert;
920 1.28 christos el->el_map.help = el_malloc(sizeof(*el->el_map.help) * EL_NUM_FCNS);
921 1.13 christos if (el->el_map.help == NULL)
922 1.29 christos return -1;
923 1.11 lukem (void) memcpy(el->el_map.help, help__get(),
924 1.28 christos sizeof(*el->el_map.help) * EL_NUM_FCNS);
925 1.28 christos el->el_map.func = el_malloc(sizeof(*el->el_map.func) * EL_NUM_FCNS);
926 1.13 christos if (el->el_map.func == NULL)
927 1.29 christos return -1;
928 1.28 christos memcpy(el->el_map.func, func__get(), sizeof(*el->el_map.func)
929 1.28 christos * EL_NUM_FCNS);
930 1.11 lukem el->el_map.nfunc = EL_NUM_FCNS;
931 1.1 cgd
932 1.1 cgd #ifdef VIDEFAULT
933 1.11 lukem map_init_vi(el);
934 1.1 cgd #else
935 1.11 lukem map_init_emacs(el);
936 1.1 cgd #endif /* VIDEFAULT */
937 1.29 christos return 0;
938 1.1 cgd }
939 1.1 cgd
940 1.1 cgd
941 1.1 cgd /* map_end():
942 1.1 cgd * Free the space taken by the editor maps
943 1.1 cgd */
944 1.1 cgd protected void
945 1.11 lukem map_end(EditLine *el)
946 1.1 cgd {
947 1.11 lukem
948 1.28 christos el_free(el->el_map.alt);
949 1.11 lukem el->el_map.alt = NULL;
950 1.28 christos el_free(el->el_map.key);
951 1.11 lukem el->el_map.key = NULL;
952 1.11 lukem el->el_map.emacs = NULL;
953 1.11 lukem el->el_map.vic = NULL;
954 1.11 lukem el->el_map.vii = NULL;
955 1.28 christos el_free(el->el_map.help);
956 1.11 lukem el->el_map.help = NULL;
957 1.28 christos el_free(el->el_map.func);
958 1.11 lukem el->el_map.func = NULL;
959 1.1 cgd }
960 1.1 cgd
961 1.1 cgd
962 1.1 cgd /* map_init_nls():
963 1.1 cgd * Find all the printable keys and bind them to self insert
964 1.1 cgd */
965 1.1 cgd private void
966 1.11 lukem map_init_nls(EditLine *el)
967 1.1 cgd {
968 1.11 lukem int i;
969 1.1 cgd
970 1.11 lukem el_action_t *map = el->el_map.key;
971 1.11 lukem
972 1.11 lukem for (i = 0200; i <= 0377; i++)
973 1.25 christos if (Isprint(i))
974 1.11 lukem map[i] = ED_INSERT;
975 1.1 cgd }
976 1.1 cgd
977 1.1 cgd
978 1.1 cgd /* map_init_meta():
979 1.1 cgd * Bind all the meta keys to the appropriate ESC-<key> sequence
980 1.1 cgd */
981 1.1 cgd private void
982 1.11 lukem map_init_meta(EditLine *el)
983 1.1 cgd {
984 1.25 christos Char buf[3];
985 1.11 lukem int i;
986 1.11 lukem el_action_t *map = el->el_map.key;
987 1.11 lukem el_action_t *alt = el->el_map.alt;
988 1.11 lukem
989 1.11 lukem for (i = 0; i <= 0377 && map[i] != EM_META_NEXT; i++)
990 1.11 lukem continue;
991 1.11 lukem
992 1.1 cgd if (i > 0377) {
993 1.11 lukem for (i = 0; i <= 0377 && alt[i] != EM_META_NEXT; i++)
994 1.11 lukem continue;
995 1.11 lukem if (i > 0377) {
996 1.11 lukem i = 033;
997 1.11 lukem if (el->el_map.type == MAP_VI)
998 1.11 lukem map = alt;
999 1.11 lukem } else
1000 1.11 lukem map = alt;
1001 1.1 cgd }
1002 1.25 christos buf[0] = (Char) i;
1003 1.11 lukem buf[2] = 0;
1004 1.11 lukem for (i = 0200; i <= 0377; i++)
1005 1.11 lukem switch (map[i]) {
1006 1.11 lukem case ED_INSERT:
1007 1.11 lukem case ED_UNASSIGNED:
1008 1.11 lukem case ED_SEQUENCE_LEAD_IN:
1009 1.11 lukem break;
1010 1.11 lukem default:
1011 1.11 lukem buf[1] = i & 0177;
1012 1.27 christos keymacro_add(el, buf, keymacro_map_cmd(el, (int) map[i]), XK_CMD);
1013 1.11 lukem break;
1014 1.11 lukem }
1015 1.11 lukem map[(int) buf[0]] = ED_SEQUENCE_LEAD_IN;
1016 1.1 cgd }
1017 1.1 cgd
1018 1.1 cgd
1019 1.1 cgd /* map_init_vi():
1020 1.1 cgd * Initialize the vi bindings
1021 1.1 cgd */
1022 1.1 cgd protected void
1023 1.11 lukem map_init_vi(EditLine *el)
1024 1.1 cgd {
1025 1.11 lukem int i;
1026 1.11 lukem el_action_t *key = el->el_map.key;
1027 1.11 lukem el_action_t *alt = el->el_map.alt;
1028 1.14 jdolecek const el_action_t *vii = el->el_map.vii;
1029 1.14 jdolecek const el_action_t *vic = el->el_map.vic;
1030 1.11 lukem
1031 1.11 lukem el->el_map.type = MAP_VI;
1032 1.11 lukem el->el_map.current = el->el_map.key;
1033 1.11 lukem
1034 1.27 christos keymacro_reset(el);
1035 1.11 lukem
1036 1.11 lukem for (i = 0; i < N_KEYS; i++) {
1037 1.11 lukem key[i] = vii[i];
1038 1.11 lukem alt[i] = vic[i];
1039 1.11 lukem }
1040 1.1 cgd
1041 1.11 lukem map_init_meta(el);
1042 1.11 lukem map_init_nls(el);
1043 1.1 cgd
1044 1.11 lukem tty_bind_char(el, 1);
1045 1.26 christos terminal_bind_arrow(el);
1046 1.1 cgd }
1047 1.1 cgd
1048 1.1 cgd
1049 1.1 cgd /* map_init_emacs():
1050 1.1 cgd * Initialize the emacs bindings
1051 1.1 cgd */
1052 1.1 cgd protected void
1053 1.11 lukem map_init_emacs(EditLine *el)
1054 1.1 cgd {
1055 1.11 lukem int i;
1056 1.25 christos Char buf[3];
1057 1.11 lukem el_action_t *key = el->el_map.key;
1058 1.11 lukem el_action_t *alt = el->el_map.alt;
1059 1.14 jdolecek const el_action_t *emacs = el->el_map.emacs;
1060 1.11 lukem
1061 1.11 lukem el->el_map.type = MAP_EMACS;
1062 1.11 lukem el->el_map.current = el->el_map.key;
1063 1.27 christos keymacro_reset(el);
1064 1.11 lukem
1065 1.11 lukem for (i = 0; i < N_KEYS; i++) {
1066 1.11 lukem key[i] = emacs[i];
1067 1.11 lukem alt[i] = ED_UNASSIGNED;
1068 1.11 lukem }
1069 1.9 simonb
1070 1.11 lukem map_init_meta(el);
1071 1.11 lukem map_init_nls(el);
1072 1.11 lukem
1073 1.11 lukem buf[0] = CONTROL('X');
1074 1.11 lukem buf[1] = CONTROL('X');
1075 1.11 lukem buf[2] = 0;
1076 1.27 christos keymacro_add(el, buf, keymacro_map_cmd(el, EM_EXCHANGE_MARK), XK_CMD);
1077 1.11 lukem
1078 1.11 lukem tty_bind_char(el, 1);
1079 1.26 christos terminal_bind_arrow(el);
1080 1.1 cgd }
1081 1.1 cgd
1082 1.1 cgd
1083 1.1 cgd /* map_set_editor():
1084 1.9 simonb * Set the editor
1085 1.1 cgd */
1086 1.1 cgd protected int
1087 1.25 christos map_set_editor(EditLine *el, Char *editor)
1088 1.1 cgd {
1089 1.11 lukem
1090 1.25 christos if (Strcmp(editor, STR("emacs")) == 0) {
1091 1.11 lukem map_init_emacs(el);
1092 1.29 christos return 0;
1093 1.11 lukem }
1094 1.25 christos if (Strcmp(editor, STR("vi")) == 0) {
1095 1.11 lukem map_init_vi(el);
1096 1.29 christos return 0;
1097 1.11 lukem }
1098 1.29 christos return -1;
1099 1.7 lukem }
1100 1.7 lukem
1101 1.7 lukem
1102 1.7 lukem /* map_get_editor():
1103 1.9 simonb * Retrieve the editor
1104 1.7 lukem */
1105 1.7 lukem protected int
1106 1.25 christos map_get_editor(EditLine *el, const Char **editor)
1107 1.7 lukem {
1108 1.7 lukem
1109 1.11 lukem if (editor == NULL)
1110 1.29 christos return -1;
1111 1.11 lukem switch (el->el_map.type) {
1112 1.11 lukem case MAP_EMACS:
1113 1.25 christos *editor = STR("emacs");
1114 1.29 christos return 0;
1115 1.11 lukem case MAP_VI:
1116 1.25 christos *editor = STR("vi");
1117 1.29 christos return 0;
1118 1.11 lukem }
1119 1.29 christos return -1;
1120 1.1 cgd }
1121 1.1 cgd
1122 1.1 cgd
1123 1.1 cgd /* map_print_key():
1124 1.1 cgd * Print the function description for 1 key
1125 1.1 cgd */
1126 1.1 cgd private void
1127 1.25 christos map_print_key(EditLine *el, el_action_t *map, const Char *in)
1128 1.1 cgd {
1129 1.11 lukem char outbuf[EL_BUFSIZ];
1130 1.21 christos el_bindings_t *bp, *ep;
1131 1.1 cgd
1132 1.11 lukem if (in[0] == '\0' || in[1] == '\0') {
1133 1.27 christos (void) keymacro__decode_str(in, outbuf, sizeof(outbuf), "");
1134 1.21 christos ep = &el->el_map.help[el->el_map.nfunc];
1135 1.21 christos for (bp = el->el_map.help; bp < ep; bp++)
1136 1.11 lukem if (bp->func == map[(unsigned char) *in]) {
1137 1.11 lukem (void) fprintf(el->el_outfile,
1138 1.25 christos "%s\t->\t" FSTR "\n", outbuf, bp->name);
1139 1.11 lukem return;
1140 1.11 lukem }
1141 1.11 lukem } else
1142 1.27 christos keymacro_print(el, in);
1143 1.1 cgd }
1144 1.1 cgd
1145 1.1 cgd
1146 1.1 cgd /* map_print_some_keys():
1147 1.1 cgd * Print keys from first to last
1148 1.1 cgd */
1149 1.1 cgd private void
1150 1.37 christos map_print_some_keys(EditLine *el, el_action_t *map, wint_t first, wint_t last)
1151 1.1 cgd {
1152 1.22 christos el_bindings_t *bp, *ep;
1153 1.25 christos Char firstbuf[2], lastbuf[2];
1154 1.11 lukem char unparsbuf[EL_BUFSIZ], extrabuf[EL_BUFSIZ];
1155 1.11 lukem
1156 1.36 christos firstbuf[0] = (Char)first;
1157 1.11 lukem firstbuf[1] = 0;
1158 1.36 christos lastbuf[0] = (Char)last;
1159 1.11 lukem lastbuf[1] = 0;
1160 1.11 lukem if (map[first] == ED_UNASSIGNED) {
1161 1.23 christos if (first == last) {
1162 1.27 christos (void) keymacro__decode_str(firstbuf, unparsbuf,
1163 1.23 christos sizeof(unparsbuf), STRQQ);
1164 1.11 lukem (void) fprintf(el->el_outfile,
1165 1.23 christos "%-15s-> is undefined\n", unparsbuf);
1166 1.23 christos }
1167 1.11 lukem return;
1168 1.11 lukem }
1169 1.22 christos ep = &el->el_map.help[el->el_map.nfunc];
1170 1.22 christos for (bp = el->el_map.help; bp < ep; bp++) {
1171 1.11 lukem if (bp->func == map[first]) {
1172 1.11 lukem if (first == last) {
1173 1.27 christos (void) keymacro__decode_str(firstbuf, unparsbuf,
1174 1.23 christos sizeof(unparsbuf), STRQQ);
1175 1.25 christos (void) fprintf(el->el_outfile, "%-15s-> " FSTR "\n",
1176 1.23 christos unparsbuf, bp->name);
1177 1.11 lukem } else {
1178 1.27 christos (void) keymacro__decode_str(firstbuf, unparsbuf,
1179 1.23 christos sizeof(unparsbuf), STRQQ);
1180 1.27 christos (void) keymacro__decode_str(lastbuf, extrabuf,
1181 1.23 christos sizeof(extrabuf), STRQQ);
1182 1.11 lukem (void) fprintf(el->el_outfile,
1183 1.25 christos "%-4s to %-7s-> " FSTR "\n",
1184 1.23 christos unparsbuf, extrabuf, bp->name);
1185 1.11 lukem }
1186 1.11 lukem return;
1187 1.11 lukem }
1188 1.11 lukem }
1189 1.11 lukem #ifdef MAP_DEBUG
1190 1.11 lukem if (map == el->el_map.key) {
1191 1.27 christos (void) keymacro__decode_str(firstbuf, unparsbuf,
1192 1.23 christos sizeof(unparsbuf), STRQQ);
1193 1.11 lukem (void) fprintf(el->el_outfile,
1194 1.23 christos "BUG!!! %s isn't bound to anything.\n", unparsbuf);
1195 1.11 lukem (void) fprintf(el->el_outfile, "el->el_map.key[%d] == %d\n",
1196 1.11 lukem first, el->el_map.key[first]);
1197 1.11 lukem } else {
1198 1.27 christos (void) keymacro__decode_str(firstbuf, unparsbuf,
1199 1.23 christos sizeof(unparsbuf), STRQQ);
1200 1.11 lukem (void) fprintf(el->el_outfile,
1201 1.23 christos "BUG!!! %s isn't bound to anything.\n", unparsbuf);
1202 1.11 lukem (void) fprintf(el->el_outfile, "el->el_map.alt[%d] == %d\n",
1203 1.11 lukem first, el->el_map.alt[first]);
1204 1.1 cgd }
1205 1.1 cgd #endif
1206 1.12 christos EL_ABORT((el->el_errfile, "Error printing keys\n"));
1207 1.1 cgd }
1208 1.1 cgd
1209 1.1 cgd
1210 1.1 cgd /* map_print_all_keys():
1211 1.1 cgd * Print the function description for all keys.
1212 1.1 cgd */
1213 1.1 cgd private void
1214 1.11 lukem map_print_all_keys(EditLine *el)
1215 1.1 cgd {
1216 1.11 lukem int prev, i;
1217 1.1 cgd
1218 1.11 lukem (void) fprintf(el->el_outfile, "Standard key bindings\n");
1219 1.11 lukem prev = 0;
1220 1.11 lukem for (i = 0; i < N_KEYS; i++) {
1221 1.11 lukem if (el->el_map.key[prev] == el->el_map.key[i])
1222 1.11 lukem continue;
1223 1.11 lukem map_print_some_keys(el, el->el_map.key, prev, i - 1);
1224 1.11 lukem prev = i;
1225 1.11 lukem }
1226 1.1 cgd map_print_some_keys(el, el->el_map.key, prev, i - 1);
1227 1.11 lukem
1228 1.11 lukem (void) fprintf(el->el_outfile, "Alternative key bindings\n");
1229 1.11 lukem prev = 0;
1230 1.11 lukem for (i = 0; i < N_KEYS; i++) {
1231 1.11 lukem if (el->el_map.alt[prev] == el->el_map.alt[i])
1232 1.11 lukem continue;
1233 1.11 lukem map_print_some_keys(el, el->el_map.alt, prev, i - 1);
1234 1.11 lukem prev = i;
1235 1.11 lukem }
1236 1.1 cgd map_print_some_keys(el, el->el_map.alt, prev, i - 1);
1237 1.11 lukem
1238 1.11 lukem (void) fprintf(el->el_outfile, "Multi-character bindings\n");
1239 1.27 christos keymacro_print(el, STR(""));
1240 1.11 lukem (void) fprintf(el->el_outfile, "Arrow key bindings\n");
1241 1.26 christos terminal_print_arrow(el, STR(""));
1242 1.1 cgd }
1243 1.1 cgd
1244 1.1 cgd
1245 1.1 cgd /* map_bind():
1246 1.1 cgd * Add/remove/change bindings
1247 1.1 cgd */
1248 1.1 cgd protected int
1249 1.25 christos map_bind(EditLine *el, int argc, const Char **argv)
1250 1.1 cgd {
1251 1.11 lukem el_action_t *map;
1252 1.11 lukem int ntype, rem;
1253 1.25 christos const Char *p;
1254 1.25 christos Char inbuf[EL_BUFSIZ];
1255 1.25 christos Char outbuf[EL_BUFSIZ];
1256 1.25 christos const Char *in = NULL;
1257 1.33 christos Char *out;
1258 1.22 christos el_bindings_t *bp, *ep;
1259 1.11 lukem int cmd;
1260 1.11 lukem int key;
1261 1.11 lukem
1262 1.11 lukem if (argv == NULL)
1263 1.29 christos return -1;
1264 1.11 lukem
1265 1.11 lukem map = el->el_map.key;
1266 1.11 lukem ntype = XK_CMD;
1267 1.11 lukem key = rem = 0;
1268 1.11 lukem for (argc = 1; (p = argv[argc]) != NULL; argc++)
1269 1.11 lukem if (p[0] == '-')
1270 1.11 lukem switch (p[1]) {
1271 1.11 lukem case 'a':
1272 1.11 lukem map = el->el_map.alt;
1273 1.11 lukem break;
1274 1.11 lukem
1275 1.11 lukem case 's':
1276 1.11 lukem ntype = XK_STR;
1277 1.11 lukem break;
1278 1.1 cgd #ifdef notyet
1279 1.11 lukem case 'c':
1280 1.11 lukem ntype = XK_EXE;
1281 1.11 lukem break;
1282 1.1 cgd #endif
1283 1.11 lukem case 'k':
1284 1.11 lukem key = 1;
1285 1.11 lukem break;
1286 1.11 lukem
1287 1.11 lukem case 'r':
1288 1.11 lukem rem = 1;
1289 1.11 lukem break;
1290 1.11 lukem
1291 1.11 lukem case 'v':
1292 1.11 lukem map_init_vi(el);
1293 1.29 christos return 0;
1294 1.11 lukem
1295 1.11 lukem case 'e':
1296 1.11 lukem map_init_emacs(el);
1297 1.29 christos return 0;
1298 1.11 lukem
1299 1.11 lukem case 'l':
1300 1.22 christos ep = &el->el_map.help[el->el_map.nfunc];
1301 1.22 christos for (bp = el->el_map.help; bp < ep; bp++)
1302 1.11 lukem (void) fprintf(el->el_outfile,
1303 1.25 christos "" FSTR "\n\t" FSTR "\n",
1304 1.11 lukem bp->name, bp->description);
1305 1.29 christos return 0;
1306 1.11 lukem default:
1307 1.11 lukem (void) fprintf(el->el_errfile,
1308 1.37 christos "" FSTR ": Invalid switch `%lc'.\n",
1309 1.37 christos argv[0], (wint_t)p[1]);
1310 1.11 lukem }
1311 1.11 lukem else
1312 1.11 lukem break;
1313 1.11 lukem
1314 1.11 lukem if (argv[argc] == NULL) {
1315 1.11 lukem map_print_all_keys(el);
1316 1.29 christos return 0;
1317 1.11 lukem }
1318 1.11 lukem if (key)
1319 1.11 lukem in = argv[argc++];
1320 1.11 lukem else if ((in = parse__string(inbuf, argv[argc++])) == NULL) {
1321 1.11 lukem (void) fprintf(el->el_errfile,
1322 1.25 christos "" FSTR ": Invalid \\ or ^ in instring.\n",
1323 1.11 lukem argv[0]);
1324 1.29 christos return -1;
1325 1.11 lukem }
1326 1.11 lukem if (rem) {
1327 1.11 lukem if (key) {
1328 1.26 christos (void) terminal_clear_arrow(el, in);
1329 1.29 christos return -1;
1330 1.11 lukem }
1331 1.11 lukem if (in[1])
1332 1.27 christos (void) keymacro_delete(el, in);
1333 1.11 lukem else if (map[(unsigned char) *in] == ED_SEQUENCE_LEAD_IN)
1334 1.27 christos (void) keymacro_delete(el, in);
1335 1.11 lukem else
1336 1.11 lukem map[(unsigned char) *in] = ED_UNASSIGNED;
1337 1.29 christos return 0;
1338 1.1 cgd }
1339 1.11 lukem if (argv[argc] == NULL) {
1340 1.11 lukem if (key)
1341 1.26 christos terminal_print_arrow(el, in);
1342 1.11 lukem else
1343 1.11 lukem map_print_key(el, map, in);
1344 1.29 christos return 0;
1345 1.1 cgd }
1346 1.1 cgd #ifdef notyet
1347 1.11 lukem if (argv[argc + 1] != NULL) {
1348 1.27 christos bindkeymacro_usage();
1349 1.29 christos return -1;
1350 1.11 lukem }
1351 1.1 cgd #endif
1352 1.1 cgd
1353 1.11 lukem switch (ntype) {
1354 1.11 lukem case XK_STR:
1355 1.11 lukem case XK_EXE:
1356 1.11 lukem if ((out = parse__string(outbuf, argv[argc])) == NULL) {
1357 1.11 lukem (void) fprintf(el->el_errfile,
1358 1.25 christos "" FSTR ": Invalid \\ or ^ in outstring.\n", argv[0]);
1359 1.29 christos return -1;
1360 1.11 lukem }
1361 1.11 lukem if (key)
1362 1.27 christos terminal_set_arrow(el, in, keymacro_map_str(el, out), ntype);
1363 1.11 lukem else
1364 1.27 christos keymacro_add(el, in, keymacro_map_str(el, out), ntype);
1365 1.1 cgd map[(unsigned char) *in] = ED_SEQUENCE_LEAD_IN;
1366 1.11 lukem break;
1367 1.11 lukem
1368 1.11 lukem case XK_CMD:
1369 1.11 lukem if ((cmd = parse_cmd(el, argv[argc])) == -1) {
1370 1.11 lukem (void) fprintf(el->el_errfile,
1371 1.25 christos "" FSTR ": Invalid command `" FSTR "'.\n",
1372 1.25 christos argv[0], argv[argc]);
1373 1.29 christos return -1;
1374 1.11 lukem }
1375 1.11 lukem if (key)
1376 1.32 christos terminal_set_arrow(el, in, keymacro_map_cmd(el, cmd), ntype);
1377 1.11 lukem else {
1378 1.11 lukem if (in[1]) {
1379 1.27 christos keymacro_add(el, in, keymacro_map_cmd(el, cmd), ntype);
1380 1.11 lukem map[(unsigned char) *in] = ED_SEQUENCE_LEAD_IN;
1381 1.11 lukem } else {
1382 1.27 christos keymacro_clear(el, map, in);
1383 1.30 christos map[(unsigned char) *in] = (el_action_t)cmd;
1384 1.11 lukem }
1385 1.11 lukem }
1386 1.11 lukem break;
1387 1.11 lukem
1388 1.31 christos /* coverity[dead_error_begin] */
1389 1.11 lukem default:
1390 1.24 christos EL_ABORT((el->el_errfile, "Bad XK_ type %d\n", ntype));
1391 1.11 lukem break;
1392 1.1 cgd }
1393 1.29 christos return 0;
1394 1.1 cgd }
1395 1.1 cgd
1396 1.1 cgd
1397 1.1 cgd /* map_addfunc():
1398 1.1 cgd * add a user defined function
1399 1.1 cgd */
1400 1.1 cgd protected int
1401 1.25 christos map_addfunc(EditLine *el, const Char *name, const Char *help, el_func_t func)
1402 1.1 cgd {
1403 1.13 christos void *p;
1404 1.34 christos size_t nf = el->el_map.nfunc + 1;
1405 1.11 lukem
1406 1.11 lukem if (name == NULL || help == NULL || func == NULL)
1407 1.29 christos return -1;
1408 1.11 lukem
1409 1.28 christos if ((p = el_realloc(el->el_map.func, nf *
1410 1.28 christos sizeof(*el->el_map.func))) == NULL)
1411 1.29 christos return -1;
1412 1.28 christos el->el_map.func = p;
1413 1.28 christos if ((p = el_realloc(el->el_map.help, nf * sizeof(*el->el_map.help)))
1414 1.13 christos == NULL)
1415 1.29 christos return -1;
1416 1.28 christos el->el_map.help = p;
1417 1.11 lukem
1418 1.30 christos nf = (size_t)el->el_map.nfunc;
1419 1.11 lukem el->el_map.func[nf] = func;
1420 1.11 lukem
1421 1.11 lukem el->el_map.help[nf].name = name;
1422 1.30 christos el->el_map.help[nf].func = (int)nf;
1423 1.11 lukem el->el_map.help[nf].description = help;
1424 1.11 lukem el->el_map.nfunc++;
1425 1.1 cgd
1426 1.29 christos return 0;
1427 1.1 cgd }
1428