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