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