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