1 /*
2 * ed.defns.c: Editor function definitions and initialization
3 */
4 /*-
5 * Copyright (c) 1980, 1991 The Regents of the University of California.
6 * All rights reserved.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 * 3. Neither the name of the University nor the names of its contributors
17 * may be used to endorse or promote products derived from this software
18 * without specific prior written permission.
19 *
20 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
21 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
24 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30 * SUCH DAMAGE.
31 */
32 #include "sh.h"
33 #include "ed.h"
34
35 static void ed_InitMetaBindings (void);
36
37 PFCmd CcFuncTbl[] = { /* table of available commands */
38 e_unassigned,
39 /* no #define here -- this is a dummy to detect initing of the key map */
40 e_unassigned,
41 #define F_UNASSIGNED 1
42 e_insert,
43 #define F_INSERT 2
44 e_newline,
45 #define F_NEWLINE 3
46 e_delprev,
47 #define F_DELPREV 4
48 e_delnext,
49 #define F_DELNEXT 5
50 e_toend,
51 #define F_TOEND 6
52 e_tobeg,
53 #define F_TOBEG 7
54 e_charback,
55 #define F_CHARBACK 8
56 e_charfwd,
57 #define F_CHARFWD 9
58 e_quote,
59 #define F_QUOTE 10
60 e_startover,
61 #define F_STARTOVER 11
62 e_redisp,
63 #define F_REDISP 12
64 e_tty_int,
65 #define F_TTY_INT 13
66 e_wordback,
67 #define F_WORDBACK 14
68 e_wordfwd,
69 #define F_WORDFWD 15
70 e_cleardisp,
71 #define F_CLEARDISP 16
72 e_complete,
73 #define F_COMPLETE 17
74 e_correct,
75 #define F_CORRECT 18
76 e_up_hist,
77 #define F_UP_HIST 19
78 e_down_hist,
79 #define F_DOWN_HIST 20
80 e_up_search_hist,
81 #define F_UP_SEARCH_HIST 21
82 e_down_search_hist,
83 #define F_DOWN_SEARCH_HIST 22
84 e_helpme,
85 #define F_HELPME 23
86 e_list_choices,
87 #define F_LIST_CHOICES 24
88 e_delwordprev,
89 #define F_DELWORDPREV 25
90 e_delwordnext,
91 #define F_DELWORDNEXT 26
92 e_digit,
93 #define F_DIGIT 27
94 e_killend,
95 #define F_KILLEND 28
96 e_killbeg,
97 #define F_KILLBEG 29
98 e_metanext,
99 #define F_METANEXT 30
100 e_send_eof,
101 #define F_SEND_EOF 31
102 e_charswitch,
103 #define F_CHARSWITCH 32
104 e_which,
105 #define F_WHICH 33
106 e_yank_kill,
107 #define F_YANK_KILL 34
108 e_tty_dsusp,
109 #define F_TTY_DSUSP 35
110 e_tty_flusho,
111 #define F_TTY_FLUSHO 36
112 e_tty_quit,
113 #define F_TTY_QUIT 37
114 e_tty_tsusp,
115 #define F_TTY_TSUSP 38
116 e_tty_stopo,
117 #define F_TTY_STOPO 39
118 e_tty_starto,
119 #define F_TTY_STARTO 40
120 e_argfour,
121 #define F_ARGFOUR 41
122 e_set_mark,
123 #define F_SET_MARK 42
124 e_exchange_mark,
125 #define F_EXCHANGE_MARK 43
126 e_last_item,
127 #define F_LAST_ITEM 44
128 e_delnext_list_eof,
129 #define F_DELNEXT_LIST_EOF 45
130 v_cmd_mode,
131 #define V_CMD_MODE 46
132 v_insert,
133 #define V_INSERT 47
134 e_argdigit,
135 #define F_ARGDIGIT 48
136 e_killregion,
137 #define F_KILLREGION 49
138 e_copyregion,
139 #define F_COPYREGION 50
140 e_gcharswitch,
141 #define F_GCHARSWITCH 51
142 e_run_fg_editor,
143 #define F_RUN_FG_EDITOR 52
144 e_unassigned, /* place holder for sequence lead in character */
145 #define F_XKEY 53
146 e_uppercase,
147 #define F_CASEUPPER 54
148 e_lowercase,
149 #define F_CASELOWER 55
150 e_capitalcase,
151 #define F_CASECAPITAL 56
152 v_zero,
153 #define V_ZERO 57
154 v_add,
155 #define V_ADD 58
156 v_addend,
157 #define V_ADDEND 59
158 v_wordbegnext,
159 #define V_WORDBEGNEXT 60
160 e_killall,
161 #define F_KILLALL 61
162 e_unassigned,
163 /* F_EXTENDNEXT removed */
164 v_insbeg,
165 #define V_INSBEG 63
166 v_replmode,
167 #define V_REPLMODE 64
168 v_replone,
169 #define V_REPLONE 65
170 v_substline,
171 #define V_SUBSTLINE 66
172 v_substchar,
173 #define V_SUBSTCHAR 67
174 v_chgtoend,
175 #define V_CHGTOEND 68
176 e_list_eof,
177 #define F_LIST_EOF 69
178 e_list_glob,
179 #define F_LIST_GLOB 70
180 e_expand_history,
181 #define F_EXPAND_HISTORY 71
182 e_magic_space,
183 #define F_MAGIC_SPACE 72
184 e_insovr,
185 #define F_INSOVR 73
186 v_cm_complete,
187 #define V_CM_COMPLETE 74
188 e_copyprev,
189 #define F_COPYPREV 75
190 e_correctl,
191 #define F_CORRECT_L 76
192 e_expand_glob,
193 #define F_EXPAND_GLOB 77
194 e_expand_vars,
195 #define F_EXPAND_VARS 78
196 e_toggle_hist,
197 #define F_TOGGLE_HIST 79
198 v_change_case,
199 #define V_CHGCASE 80
200 e_expand,
201 #define F_EXPAND 81
202 e_load_average,
203 #define F_LOAD_AVERAGE 82
204 v_delprev,
205 #define V_DELPREV 83
206 v_delmeta,
207 #define V_DELMETA 84
208 v_wordfwd,
209 #define V_WORDFWD 85
210 v_wordback,
211 #define V_WORDBACK 86
212 v_endword,
213 #define V_ENDWORD 87
214 v_eword,
215 #define V_EWORD 88
216 v_undo,
217 #define V_UNDO 89
218 v_ush_meta,
219 #define V_USH_META 90
220 v_dsh_meta,
221 #define V_DSH_META 91
222 v_rsrch_fwd,
223 #define V_RSRCH_FWD 92
224 v_rsrch_back,
225 #define V_RSRCH_BACK 93
226 v_char_fwd,
227 #define V_CHAR_FWD 94
228 v_char_back,
229 #define V_CHAR_BACK 95
230 v_chgmeta,
231 #define V_CHGMETA 96
232 e_inc_fwd,
233 #define F_INC_FWD 97
234 e_inc_back,
235 #define F_INC_BACK 98
236 v_rchar_fwd,
237 #define V_RCHAR_FWD 99
238 v_rchar_back,
239 #define V_RCHAR_BACK 100
240 v_charto_fwd,
241 #define V_CHARTO_FWD 101
242 v_charto_back,
243 #define V_CHARTO_BACK 102
244 e_normalize_path,
245 #define F_PATH_NORM 103
246 e_delnext_eof, /* added by mtk@ari.ncl.omron.co.jp (920818) */
247 #define F_DELNEXT_EOF 104
248 e_stuff_char,
249 #define F_STUFF_CHAR 105
250 e_complete_all,
251 #define F_COMPLETE_ALL 106
252 e_list_all,
253 #define F_LIST_ALL 107
254 e_complete_fwd,
255 #define F_COMPLETE_FWD 108
256 e_complete_back,
257 #define F_COMPLETE_BACK 109
258 e_delnext_list,
259 #define F_DELNEXT_LIST 110
260 e_normalize_command,
261 #define F_COMMAND_NORM 111
262 e_dabbrev_expand,
263 #define F_DABBREV_EXPAND 112
264 e_dosify_next,
265 #define F_DOSIFY_NEXT 113
266 e_dosify_prev,
267 #define F_DOSIFY_PREV 114
268 e_page_up,
269 #define F_PAGE_UP 115
270 e_page_down,
271 #define F_PAGE_DOWN 116
272 e_yank_pop,
273 #define F_YANK_POP 117
274 e_newline_hold,
275 #define F_NEWLINE_HOLD 118
276 e_newline_down_hist,
277 #define F_NEWLINE_DOWN_HIST 119
278 0 /* DUMMY VALUE */
279 #define F_NUM_FNS 120
280
281 };
282
283 KEYCMD NumFuns = F_NUM_FNS;
284
285 KEYCMD CcKeyMap[NT_NUM_KEYS]; /* the real key map */
286 KEYCMD CcAltMap[NT_NUM_KEYS]; /* the alternative key map */
287 #define F_NUM_FUNCNAMES (F_NUM_FNS + 2)
288 struct KeyFuncs FuncNames[F_NUM_FUNCNAMES];
289
290 #ifdef WINNT_NATIVE
291 extern KEYCMD CcEmacsMap[];
292 extern KEYCMD CcViMap[];
293 extern KEYCMD CcViCmdMap[];
294 #else /* !WINNT_NATIVE*/
295 KEYCMD CcEmacsMap[] = {
296 /* keymap table, each index into above tbl; should be 256*sizeof(KEYCMD)
297 bytes long */
298
299 F_SET_MARK, /* ^@ */
300 F_TOBEG, /* ^A */
301 F_CHARBACK, /* ^B */
302 F_TTY_INT, /* ^C */
303 F_DELNEXT_LIST_EOF, /* ^D */
304 F_TOEND, /* ^E */
305 F_CHARFWD, /* ^F */
306 F_UNASSIGNED, /* ^G */
307 F_DELPREV, /* ^H */
308 F_COMPLETE, /* ^I */
309 F_NEWLINE, /* ^J */
310 F_KILLEND, /* ^K */
311 F_CLEARDISP, /* ^L */
312 F_NEWLINE, /* ^M */
313 F_DOWN_HIST, /* ^N */
314 F_TTY_FLUSHO, /* ^O */
315 F_UP_HIST, /* ^P */
316 F_TTY_STARTO, /* ^Q */
317 F_REDISP, /* ^R */
318 F_TTY_STOPO, /* ^S */
319 F_CHARSWITCH, /* ^T */
320 F_KILLALL, /* ^U */
321 F_QUOTE, /* ^V */
322 F_KILLREGION, /* ^W */
323 F_XKEY, /* ^X */
324 F_YANK_KILL, /* ^Y */
325 F_TTY_TSUSP, /* ^Z */
326 F_METANEXT, /* ^[ */
327 F_TTY_QUIT, /* ^\ */
328 F_TTY_DSUSP, /* ^] */
329 F_UNASSIGNED, /* ^^ */
330 F_UNASSIGNED, /* ^_ */
331 F_INSERT, /* SPACE */
332 F_INSERT, /* ! */
333 F_INSERT, /* " */
334 F_INSERT, /* # */
335 F_INSERT, /* $ */
336 F_INSERT, /* % */
337 F_INSERT, /* & */
338 F_INSERT, /* ' */
339 F_INSERT, /* ( */
340 F_INSERT, /* ) */
341 F_INSERT, /* * */
342 F_INSERT, /* + */
343 F_INSERT, /* , */
344 F_INSERT, /* - */
345 F_INSERT, /* . */
346 F_INSERT, /* / */
347 F_DIGIT, /* 0 */
348 F_DIGIT, /* 1 */
349 F_DIGIT, /* 2 */
350 F_DIGIT, /* 3 */
351 F_DIGIT, /* 4 */
352 F_DIGIT, /* 5 */
353 F_DIGIT, /* 6 */
354 F_DIGIT, /* 7 */
355 F_DIGIT, /* 8 */
356 F_DIGIT, /* 9 */
357 F_INSERT, /* : */
358 F_INSERT, /* ; */
359 F_INSERT, /* < */
360 F_INSERT, /* = */
361 F_INSERT, /* > */
362 F_INSERT, /* ? */
363 F_INSERT, /* @ */
364 F_INSERT, /* A */
365 F_INSERT, /* B */
366 F_INSERT, /* C */
367 F_INSERT, /* D */
368 F_INSERT, /* E */
369 F_INSERT, /* F */
370 F_INSERT, /* G */
371 F_INSERT, /* H */
372 F_INSERT, /* I */
373 F_INSERT, /* J */
374 F_INSERT, /* K */
375 F_INSERT, /* L */
376 F_INSERT, /* M */
377 F_INSERT, /* N */
378 F_INSERT, /* O */
379 F_INSERT, /* P */
380 F_INSERT, /* Q */
381 F_INSERT, /* R */
382 F_INSERT, /* S */
383 F_INSERT, /* T */
384 F_INSERT, /* U */
385 F_INSERT, /* V */
386 F_INSERT, /* W */
387 F_INSERT, /* X */
388 F_INSERT, /* Y */
389 F_INSERT, /* Z */
390 F_INSERT, /* [ */
391 F_INSERT, /* \ */
392 F_INSERT, /* ] */
393 F_INSERT, /* ^ */
394 F_INSERT, /* _ */
395 F_INSERT, /* ` */
396 F_INSERT, /* a */
397 F_INSERT, /* b */
398 F_INSERT, /* c */
399 F_INSERT, /* d */
400 F_INSERT, /* e */
401 F_INSERT, /* f */
402 F_INSERT, /* g */
403 F_INSERT, /* h */
404 F_INSERT, /* i */
405 F_INSERT, /* j */
406 F_INSERT, /* k */
407 F_INSERT, /* l */
408 F_INSERT, /* m */
409 F_INSERT, /* n */
410 F_INSERT, /* o */
411 F_INSERT, /* p */
412 F_INSERT, /* q */
413 F_INSERT, /* r */
414 F_INSERT, /* s */
415 F_INSERT, /* t */
416 F_INSERT, /* u */
417 F_INSERT, /* v */
418 F_INSERT, /* w */
419 F_INSERT, /* x */
420 F_INSERT, /* y */
421 F_INSERT, /* z */
422 F_INSERT, /* { */
423 F_INSERT, /* | */
424 F_INSERT, /* } */
425 F_INSERT, /* ~ */
426 F_DELPREV, /* ^? */
427 F_UNASSIGNED, /* M-^@ */
428 F_UNASSIGNED, /* M-^A */
429 F_UNASSIGNED, /* M-^B */
430 F_UNASSIGNED, /* M-^C */
431 F_LIST_CHOICES, /* M-^D */
432 F_UNASSIGNED, /* M-^E */
433 F_UNASSIGNED, /* M-^F */
434 F_UNASSIGNED, /* M-^G */
435 F_DELWORDPREV, /* M-^H */
436 F_COMPLETE, /* M-^I */
437 F_UNASSIGNED, /* M-^J */
438 F_UNASSIGNED, /* M-^K */
439 F_CLEARDISP, /* M-^L */
440 F_UNASSIGNED, /* M-^M */
441 F_UNASSIGNED, /* M-^N */
442 F_UNASSIGNED, /* M-^O */
443 F_UNASSIGNED, /* M-^P */
444 F_UNASSIGNED, /* M-^Q */
445 F_UNASSIGNED, /* M-^R */
446 F_UNASSIGNED, /* M-^S */
447 F_UNASSIGNED, /* M-^T */
448 F_UNASSIGNED, /* M-^U */
449 F_UNASSIGNED, /* M-^V */
450 F_UNASSIGNED, /* M-^W */
451 F_UNASSIGNED, /* M-^X */
452 F_UNASSIGNED, /* M-^Y */
453 F_RUN_FG_EDITOR, /* M-^Z */
454 F_COMPLETE, /* M-^[ */
455 F_UNASSIGNED, /* M-^\ */
456 F_UNASSIGNED, /* M-^] */
457 F_UNASSIGNED, /* M-^^ */
458 F_COPYPREV, /* M-^_ */
459 F_EXPAND_HISTORY, /* M-SPACE */
460 F_EXPAND_HISTORY, /* M-! */
461 F_UNASSIGNED, /* M-" */
462 F_UNASSIGNED, /* M-# */
463 F_CORRECT_L, /* M-$ */
464 F_UNASSIGNED, /* M-% */
465 F_UNASSIGNED, /* M-& */
466 F_UNASSIGNED, /* M-' */
467 F_UNASSIGNED, /* M-( */
468 F_UNASSIGNED, /* M-) */
469 F_UNASSIGNED, /* M-* */
470 F_UNASSIGNED, /* M-+ */
471 F_UNASSIGNED, /* M-, */
472 F_UNASSIGNED, /* M-- */
473 F_UNASSIGNED, /* M-. */
474 F_DABBREV_EXPAND, /* M-/ */
475 F_ARGDIGIT, /* M-0 */
476 F_ARGDIGIT, /* M-1 */
477 F_ARGDIGIT, /* M-2 */
478 F_ARGDIGIT, /* M-3 */
479 F_ARGDIGIT, /* M-4 */
480 F_ARGDIGIT, /* M-5 */
481 F_ARGDIGIT, /* M-6 */
482 F_ARGDIGIT, /* M-7 */
483 F_ARGDIGIT, /* M-8 */
484 F_ARGDIGIT, /* M-9 */
485 F_UNASSIGNED, /* M-: */
486 F_UNASSIGNED, /* M-; */
487 F_UNASSIGNED, /* M-< */
488 F_UNASSIGNED, /* M-= */
489 F_UNASSIGNED, /* M-> */
490 F_WHICH, /* M-? */
491 F_UNASSIGNED, /* M-@ */
492 F_NEWLINE_HOLD, /* M-A */
493 F_WORDBACK, /* M-B */
494 F_CASECAPITAL, /* M-C */
495 F_DELWORDNEXT, /* M-D */
496 F_UNASSIGNED, /* M-E */
497 F_WORDFWD, /* M-F */
498 F_UNASSIGNED, /* M-G */
499 F_HELPME, /* M-H */
500 F_UNASSIGNED, /* M-I */
501 F_UNASSIGNED, /* M-J */
502 F_UNASSIGNED, /* M-K */
503 F_CASELOWER, /* M-L */
504 F_UNASSIGNED, /* M-M */
505 F_DOWN_SEARCH_HIST, /* M-N */
506 F_XKEY, /* M-O *//* extended key esc PWP Mar 88 */
507 F_UP_SEARCH_HIST, /* M-P */
508 F_UNASSIGNED, /* M-Q */
509 F_TOGGLE_HIST, /* M-R */
510 F_CORRECT, /* M-S */
511 F_UNASSIGNED, /* M-T */
512 F_CASEUPPER, /* M-U */
513 F_UNASSIGNED, /* M-V */
514 F_COPYREGION, /* M-W */
515 F_UNASSIGNED, /* M-X */
516 F_YANK_POP, /* M-Y */
517 F_UNASSIGNED, /* M-Z */
518 F_XKEY, /* M-[ *//* extended key esc -mf Oct 87 */
519 F_UNASSIGNED, /* M-\ */
520 F_UNASSIGNED, /* M-] */
521 F_UNASSIGNED, /* M-^ */
522 F_LAST_ITEM, /* M-_ */
523 F_UNASSIGNED, /* M-` */
524 F_NEWLINE_HOLD, /* M-a */
525 F_WORDBACK, /* M-b */
526 F_CASECAPITAL, /* M-c */
527 F_DELWORDNEXT, /* M-d */
528 F_UNASSIGNED, /* M-e */
529 F_WORDFWD, /* M-f */
530 F_UNASSIGNED, /* M-g */
531 F_HELPME, /* M-h */
532 F_UNASSIGNED, /* M-i */
533 F_UNASSIGNED, /* M-j */
534 F_UNASSIGNED, /* M-k */
535 F_CASELOWER, /* M-l */
536 F_UNASSIGNED, /* M-m */
537 F_DOWN_SEARCH_HIST, /* M-n */
538 F_UNASSIGNED, /* M-o */
539 F_UP_SEARCH_HIST, /* M-p */
540 F_UNASSIGNED, /* M-q */
541 F_TOGGLE_HIST, /* M-r */
542 F_CORRECT, /* M-s */
543 F_UNASSIGNED, /* M-t */
544 F_CASEUPPER, /* M-u */
545 F_UNASSIGNED, /* M-v */
546 F_COPYREGION, /* M-w */
547 F_UNASSIGNED, /* M-x */
548 F_YANK_POP, /* M-y */
549 F_UNASSIGNED, /* M-z */
550 F_UNASSIGNED, /* M-{ */
551 F_UNASSIGNED, /* M-| */
552 F_UNASSIGNED, /* M-} */
553 F_UNASSIGNED, /* M-~ */
554 F_DELWORDPREV /* M-^? */
555 };
556
557 /*
558 * keymap table for vi. Each index into above tbl; should be
559 * 256 entries long. Vi mode uses a sticky-extend to do command mode:
560 * insert mode characters are in the normal keymap, and command mode
561 * in the extended keymap.
562 */
563 static KEYCMD CcViMap[] = {
564 #ifdef KSHVI
565 F_UNASSIGNED, /* ^@ */
566 F_INSERT, /* ^A */
567 F_INSERT, /* ^B */
568 F_INSERT, /* ^C */
569 F_INSERT, /* ^D */
570 F_INSERT, /* ^E */
571 F_INSERT, /* ^F */
572 F_INSERT, /* ^G */
573 V_DELPREV, /* ^H */ /* BackSpace key */
574 F_COMPLETE, /* ^I */ /* Tab Key */
575 F_NEWLINE, /* ^J */
576 F_INSERT, /* ^K */
577 F_INSERT, /* ^L */
578 F_NEWLINE, /* ^M */
579 F_INSERT, /* ^N */
580 F_INSERT, /* ^O */
581 F_INSERT, /* ^P */
582 F_TTY_STARTO, /* ^Q */
583 F_INSERT, /* ^R */
584 F_INSERT, /* ^S */
585 F_INSERT, /* ^T */
586 F_INSERT, /* ^U */
587 F_QUOTE, /* ^V */
588 F_DELWORDPREV, /* ^W */ /* Only until start edit pos */
589 F_INSERT, /* ^X */
590 F_INSERT, /* ^Y */
591 F_INSERT, /* ^Z */
592 V_CMD_MODE, /* ^[ */ /* [ Esc ] key */
593 F_TTY_QUIT, /* ^\ */
594 F_INSERT, /* ^] */
595 F_INSERT, /* ^^ */
596 F_INSERT, /* ^_ */
597 #else /* !KSHVI */
598 F_UNASSIGNED, /* ^@ */ /* NOTE: These mapping do NOT */
599 F_TOBEG, /* ^A */ /* Correspond well to the KSH */
600 F_CHARBACK, /* ^B */ /* VI editting assignments */
601 F_TTY_INT, /* ^C */ /* On the other hand they are */
602 F_LIST_EOF, /* ^D */ /* convenient any many people */
603 F_TOEND, /* ^E */ /* have gotten used to them */
604 F_CHARFWD, /* ^F */
605 F_LIST_GLOB, /* ^G */
606 F_DELPREV, /* ^H */ /* BackSpace key */
607 F_COMPLETE, /* ^I */ /* Tab Key */
608 F_NEWLINE, /* ^J */
609 F_KILLEND, /* ^K */
610 F_CLEARDISP, /* ^L */
611 F_NEWLINE, /* ^M */
612 F_DOWN_HIST, /* ^N */
613 F_TTY_FLUSHO, /* ^O */
614 F_UP_HIST, /* ^P */
615 F_TTY_STARTO, /* ^Q */
616 F_REDISP, /* ^R */
617 F_TTY_STOPO, /* ^S */
618 F_CHARSWITCH, /* ^T */
619 F_KILLBEG, /* ^U */
620 F_QUOTE, /* ^V */
621 F_DELWORDPREV, /* ^W */
622 F_EXPAND, /* ^X */
623 F_TTY_DSUSP, /* ^Y */
624 F_TTY_TSUSP, /* ^Z */
625 V_CMD_MODE, /* ^[ */
626 F_TTY_QUIT, /* ^\ */
627 F_UNASSIGNED, /* ^] */
628 F_UNASSIGNED, /* ^^ */
629 F_UNASSIGNED, /* ^_ */
630 #endif /* KSHVI */
631 F_INSERT, /* SPACE */
632 F_INSERT, /* ! */
633 F_INSERT, /* " */
634 F_INSERT, /* # */
635 F_INSERT, /* $ */
636 F_INSERT, /* % */
637 F_INSERT, /* & */
638 F_INSERT, /* ' */
639 F_INSERT, /* ( */
640 F_INSERT, /* ) */
641 F_INSERT, /* * */
642 F_INSERT, /* + */
643 F_INSERT, /* , */
644 F_INSERT, /* - */
645 F_INSERT, /* . */
646 F_INSERT, /* / */
647 F_INSERT, /* 0 */
648 F_INSERT, /* 1 */
649 F_INSERT, /* 2 */
650 F_INSERT, /* 3 */
651 F_INSERT, /* 4 */
652 F_INSERT, /* 5 */
653 F_INSERT, /* 6 */
654 F_INSERT, /* 7 */
655 F_INSERT, /* 8 */
656 F_INSERT, /* 9 */
657 F_INSERT, /* : */
658 F_INSERT, /* ; */
659 F_INSERT, /* < */
660 F_INSERT, /* = */
661 F_INSERT, /* > */
662 F_INSERT, /* ? */
663 F_INSERT, /* @ */
664 F_INSERT, /* A */
665 F_INSERT, /* B */
666 F_INSERT, /* C */
667 F_INSERT, /* D */
668 F_INSERT, /* E */
669 F_INSERT, /* F */
670 F_INSERT, /* G */
671 F_INSERT, /* H */
672 F_INSERT, /* I */
673 F_INSERT, /* J */
674 F_INSERT, /* K */
675 F_INSERT, /* L */
676 F_INSERT, /* M */
677 F_INSERT, /* N */
678 F_INSERT, /* O */
679 F_INSERT, /* P */
680 F_INSERT, /* Q */
681 F_INSERT, /* R */
682 F_INSERT, /* S */
683 F_INSERT, /* T */
684 F_INSERT, /* U */
685 F_INSERT, /* V */
686 F_INSERT, /* W */
687 F_INSERT, /* X */
688 F_INSERT, /* Y */
689 F_INSERT, /* Z */
690 F_INSERT, /* [ */
691 F_INSERT, /* \ */
692 F_INSERT, /* ] */
693 F_INSERT, /* ^ */
694 F_INSERT, /* _ */
695 F_INSERT, /* ` */
696 F_INSERT, /* a */
697 F_INSERT, /* b */
698 F_INSERT, /* c */
699 F_INSERT, /* d */
700 F_INSERT, /* e */
701 F_INSERT, /* f */
702 F_INSERT, /* g */
703 F_INSERT, /* h */
704 F_INSERT, /* i */
705 F_INSERT, /* j */
706 F_INSERT, /* k */
707 F_INSERT, /* l */
708 F_INSERT, /* m */
709 F_INSERT, /* n */
710 F_INSERT, /* o */
711 F_INSERT, /* p */
712 F_INSERT, /* q */
713 F_INSERT, /* r */
714 F_INSERT, /* s */
715 F_INSERT, /* t */
716 F_INSERT, /* u */
717 F_INSERT, /* v */
718 F_INSERT, /* w */
719 F_INSERT, /* x */
720 F_INSERT, /* y */
721 F_INSERT, /* z */
722 F_INSERT, /* { */
723 F_INSERT, /* | */
724 F_INSERT, /* } */
725 F_INSERT, /* ~ */
726 F_DELPREV, /* ^? */
727 F_UNASSIGNED, /* M-^@ */
728 F_UNASSIGNED, /* M-^A */
729 F_UNASSIGNED, /* M-^B */
730 F_UNASSIGNED, /* M-^C */
731 F_UNASSIGNED, /* M-^D */
732 F_UNASSIGNED, /* M-^E */
733 F_UNASSIGNED, /* M-^F */
734 F_UNASSIGNED, /* M-^G */
735 F_UNASSIGNED, /* M-^H */
736 F_UNASSIGNED, /* M-^I */
737 F_UNASSIGNED, /* M-^J */
738 F_UNASSIGNED, /* M-^K */
739 F_UNASSIGNED, /* M-^L */
740 F_UNASSIGNED, /* M-^M */
741 F_UNASSIGNED, /* M-^N */
742 F_UNASSIGNED, /* M-^O */
743 F_UNASSIGNED, /* M-^P */
744 F_UNASSIGNED, /* M-^Q */
745 F_UNASSIGNED, /* M-^R */
746 F_UNASSIGNED, /* M-^S */
747 F_UNASSIGNED, /* M-^T */
748 F_UNASSIGNED, /* M-^U */
749 F_UNASSIGNED, /* M-^V */
750 F_UNASSIGNED, /* M-^W */
751 F_UNASSIGNED, /* M-^X */
752 F_UNASSIGNED, /* M-^Y */
753 F_UNASSIGNED, /* M-^Z */
754 F_UNASSIGNED, /* M-^[ */
755 F_UNASSIGNED, /* M-^\ */
756 F_UNASSIGNED, /* M-^] */
757 F_UNASSIGNED, /* M-^^ */
758 F_UNASSIGNED, /* M-^_ */
759 F_UNASSIGNED, /* M-SPACE */
760 F_UNASSIGNED, /* M-! */
761 F_UNASSIGNED, /* M-" */
762 F_UNASSIGNED, /* M-# */
763 F_UNASSIGNED, /* M-$ */
764 F_UNASSIGNED, /* M-% */
765 F_UNASSIGNED, /* M-& */
766 F_UNASSIGNED, /* M-' */
767 F_UNASSIGNED, /* M-( */
768 F_UNASSIGNED, /* M-) */
769 F_UNASSIGNED, /* M-* */
770 F_UNASSIGNED, /* M-+ */
771 F_UNASSIGNED, /* M-, */
772 F_UNASSIGNED, /* M-- */
773 F_UNASSIGNED, /* M-. */
774 F_UNASSIGNED, /* M-/ */
775 F_UNASSIGNED, /* M-0 */
776 F_UNASSIGNED, /* M-1 */
777 F_UNASSIGNED, /* M-2 */
778 F_UNASSIGNED, /* M-3 */
779 F_UNASSIGNED, /* M-4 */
780 F_UNASSIGNED, /* M-5 */
781 F_UNASSIGNED, /* M-6 */
782 F_UNASSIGNED, /* M-7 */
783 F_UNASSIGNED, /* M-8 */
784 F_UNASSIGNED, /* M-9 */
785 F_UNASSIGNED, /* M-: */
786 F_UNASSIGNED, /* M-; */
787 F_UNASSIGNED, /* M-< */
788 F_UNASSIGNED, /* M-= */
789 F_UNASSIGNED, /* M-> */
790 F_UNASSIGNED, /* M-? */
791 F_UNASSIGNED, /* M-@ */
792 F_UNASSIGNED, /* M-A */
793 F_UNASSIGNED, /* M-B */
794 F_UNASSIGNED, /* M-C */
795 F_UNASSIGNED, /* M-D */
796 F_UNASSIGNED, /* M-E */
797 F_UNASSIGNED, /* M-F */
798 F_UNASSIGNED, /* M-G */
799 F_UNASSIGNED, /* M-H */
800 F_UNASSIGNED, /* M-I */
801 F_UNASSIGNED, /* M-J */
802 F_UNASSIGNED, /* M-K */
803 F_UNASSIGNED, /* M-L */
804 F_UNASSIGNED, /* M-M */
805 F_UNASSIGNED, /* M-N */
806 F_UNASSIGNED, /* M-O */
807 F_UNASSIGNED, /* M-P */
808 F_UNASSIGNED, /* M-Q */
809 F_UNASSIGNED, /* M-R */
810 F_UNASSIGNED, /* M-S */
811 F_UNASSIGNED, /* M-T */
812 F_UNASSIGNED, /* M-U */
813 F_UNASSIGNED, /* M-V */
814 F_UNASSIGNED, /* M-W */
815 F_UNASSIGNED, /* M-X */
816 F_UNASSIGNED, /* M-Y */
817 F_UNASSIGNED, /* M-Z */
818 F_UNASSIGNED, /* M-[ */
819 F_UNASSIGNED, /* M-\ */
820 F_UNASSIGNED, /* M-] */
821 F_UNASSIGNED, /* M-^ */
822 F_UNASSIGNED, /* M-_ */
823 F_UNASSIGNED, /* M-` */
824 F_UNASSIGNED, /* M-a */
825 F_UNASSIGNED, /* M-b */
826 F_UNASSIGNED, /* M-c */
827 F_UNASSIGNED, /* M-d */
828 F_UNASSIGNED, /* M-e */
829 F_UNASSIGNED, /* M-f */
830 F_UNASSIGNED, /* M-g */
831 F_UNASSIGNED, /* M-h */
832 F_UNASSIGNED, /* M-i */
833 F_UNASSIGNED, /* M-j */
834 F_UNASSIGNED, /* M-k */
835 F_UNASSIGNED, /* M-l */
836 F_UNASSIGNED, /* M-m */
837 F_UNASSIGNED, /* M-n */
838 F_UNASSIGNED, /* M-o */
839 F_UNASSIGNED, /* M-p */
840 F_UNASSIGNED, /* M-q */
841 F_UNASSIGNED, /* M-r */
842 F_UNASSIGNED, /* M-s */
843 F_UNASSIGNED, /* M-t */
844 F_UNASSIGNED, /* M-u */
845 F_UNASSIGNED, /* M-v */
846 F_UNASSIGNED, /* M-w */
847 F_UNASSIGNED, /* M-x */
848 F_UNASSIGNED, /* M-y */
849 F_UNASSIGNED, /* M-z */
850 F_UNASSIGNED, /* M-{ */
851 F_UNASSIGNED, /* M-| */
852 F_UNASSIGNED, /* M-} */
853 F_UNASSIGNED, /* M-~ */
854 F_UNASSIGNED /* M-^? */
855 };
856
857 KEYCMD CcViCmdMap[] = {
858 F_UNASSIGNED, /* ^@ */
859 F_TOBEG, /* ^A */
860 F_UNASSIGNED, /* ^B */
861 F_TTY_INT, /* ^C */
862 F_LIST_CHOICES, /* ^D */
863 F_TOEND, /* ^E */
864 F_UNASSIGNED, /* ^F */
865 F_LIST_GLOB, /* ^G */
866 F_CHARBACK, /* ^H */
867 V_CM_COMPLETE, /* ^I */
868 F_NEWLINE, /* ^J */
869 F_KILLEND, /* ^K */
870 F_CLEARDISP, /* ^L */
871 F_NEWLINE, /* ^M */
872 F_DOWN_HIST, /* ^N */
873 F_TTY_FLUSHO, /* ^O */
874 F_UP_HIST, /* ^P */
875 F_TTY_STARTO, /* ^Q */
876 F_REDISP, /* ^R */
877 F_TTY_STOPO, /* ^S */
878 F_UNASSIGNED, /* ^T */
879 F_KILLBEG, /* ^U */
880 F_UNASSIGNED, /* ^V */
881 F_DELWORDPREV, /* ^W */
882 F_EXPAND, /* ^X */
883 F_UNASSIGNED, /* ^Y */
884 F_UNASSIGNED, /* ^Z */
885 F_METANEXT, /* ^[ */
886 F_TTY_QUIT, /* ^\ */
887 F_UNASSIGNED, /* ^] */
888 F_UNASSIGNED, /* ^^ */
889 F_UNASSIGNED, /* ^_ */
890 F_CHARFWD, /* SPACE */
891 F_EXPAND_HISTORY, /* ! */
892 F_UNASSIGNED, /* " */
893 F_UNASSIGNED, /* # */
894 F_TOEND, /* $ */
895 F_UNASSIGNED, /* % */
896 F_UNASSIGNED, /* & */
897 F_UNASSIGNED, /* ' */
898 F_UNASSIGNED, /* ( */
899 F_UNASSIGNED, /* ) */
900 F_EXPAND_GLOB, /* * */
901 F_DOWN_HIST, /* + */
902 V_RCHAR_BACK, /* , */
903 F_UP_HIST, /* - */
904 F_UNASSIGNED, /* . */
905 V_DSH_META, /* / */
906 V_ZERO, /* 0 */
907 F_ARGDIGIT, /* 1 */
908 F_ARGDIGIT, /* 2 */
909 F_ARGDIGIT, /* 3 */
910 F_ARGDIGIT, /* 4 */
911 F_ARGDIGIT, /* 5 */
912 F_ARGDIGIT, /* 6 */
913 F_ARGDIGIT, /* 7 */
914 F_ARGDIGIT, /* 8 */
915 F_ARGDIGIT, /* 9 */
916 F_UNASSIGNED, /* : */
917 V_RCHAR_FWD, /* ; */
918 F_UNASSIGNED, /* < */
919 F_UNASSIGNED, /* = */
920 F_UNASSIGNED, /* > */
921 V_USH_META, /* ? */
922 F_UNASSIGNED, /* @ */
923 V_ADDEND, /* A */
924 V_WORDBACK, /* B */
925 V_CHGTOEND, /* C */
926 F_KILLEND, /* D */
927 V_ENDWORD, /* E */
928 V_CHAR_BACK, /* F */
929 F_UNASSIGNED, /* G */
930 F_UNASSIGNED, /* H */
931 V_INSBEG, /* I */
932 F_DOWN_SEARCH_HIST, /* J */
933 F_UP_SEARCH_HIST, /* K */
934 F_UNASSIGNED, /* L */
935 F_UNASSIGNED, /* M */
936 V_RSRCH_BACK, /* N */
937 F_XKEY, /* O */
938 F_UNASSIGNED, /* P */
939 F_UNASSIGNED, /* Q */
940 V_REPLMODE, /* R */
941 V_SUBSTLINE, /* S */
942 V_CHARTO_BACK, /* T */
943 F_UNASSIGNED, /* U */
944 F_EXPAND_VARS, /* V */
945 V_WORDFWD, /* W */
946 F_DELPREV, /* X */
947 F_UNASSIGNED, /* Y */
948 F_UNASSIGNED, /* Z */
949 F_XKEY, /* [ */
950 F_UNASSIGNED, /* \ */
951 F_UNASSIGNED, /* ] */
952 F_TOBEG, /* ^ */
953 F_UNASSIGNED, /* _ */
954 F_UNASSIGNED, /* ` */
955 V_ADD, /* a */
956 F_WORDBACK, /* b */
957 V_CHGMETA, /* c */
958 V_DELMETA, /* d */
959 V_EWORD, /* e */
960 V_CHAR_FWD, /* f */
961 F_UNASSIGNED, /* g */
962 F_CHARBACK, /* h */
963 V_INSERT, /* i */
964 F_DOWN_HIST, /* j */
965 F_UP_HIST, /* k */
966 F_CHARFWD, /* l */
967 F_UNASSIGNED, /* m */
968 V_RSRCH_FWD, /* n */
969 F_UNASSIGNED, /* o */
970 F_UNASSIGNED, /* p */
971 F_UNASSIGNED, /* q */
972 V_REPLONE, /* r */
973 V_SUBSTCHAR, /* s */
974 V_CHARTO_FWD, /* t */
975 V_UNDO, /* u */
976 F_EXPAND_VARS, /* v */
977 V_WORDBEGNEXT, /* w */
978 F_DELNEXT_EOF, /* x */
979 F_UNASSIGNED, /* y */
980 F_UNASSIGNED, /* z */
981 F_UNASSIGNED, /* { */
982 F_UNASSIGNED, /* | */
983 F_UNASSIGNED, /* } */
984 V_CHGCASE, /* ~ */
985 F_DELPREV, /* ^? */
986 F_UNASSIGNED, /* M-^@ */
987 F_UNASSIGNED, /* M-^A */
988 F_UNASSIGNED, /* M-^B */
989 F_UNASSIGNED, /* M-^C */
990 F_UNASSIGNED, /* M-^D */
991 F_UNASSIGNED, /* M-^E */
992 F_UNASSIGNED, /* M-^F */
993 F_UNASSIGNED, /* M-^G */
994 F_UNASSIGNED, /* M-^H */
995 F_UNASSIGNED, /* M-^I */
996 F_UNASSIGNED, /* M-^J */
997 F_UNASSIGNED, /* M-^K */
998 F_UNASSIGNED, /* M-^L */
999 F_UNASSIGNED, /* M-^M */
1000 F_UNASSIGNED, /* M-^N */
1001 F_UNASSIGNED, /* M-^O */
1002 F_UNASSIGNED, /* M-^P */
1003 F_UNASSIGNED, /* M-^Q */
1004 F_UNASSIGNED, /* M-^R */
1005 F_UNASSIGNED, /* M-^S */
1006 F_UNASSIGNED, /* M-^T */
1007 F_UNASSIGNED, /* M-^U */
1008 F_UNASSIGNED, /* M-^V */
1009 F_UNASSIGNED, /* M-^W */
1010 F_UNASSIGNED, /* M-^X */
1011 F_UNASSIGNED, /* M-^Y */
1012 F_UNASSIGNED, /* M-^Z */
1013 F_UNASSIGNED, /* M-^[ */
1014 F_UNASSIGNED, /* M-^\ */
1015 F_UNASSIGNED, /* M-^] */
1016 F_UNASSIGNED, /* M-^^ */
1017 F_UNASSIGNED, /* M-^_ */
1018 F_UNASSIGNED, /* M-SPACE */
1019 F_UNASSIGNED, /* M-! */
1020 F_UNASSIGNED, /* M-" */
1021 F_UNASSIGNED, /* M-# */
1022 F_UNASSIGNED, /* M-$ */
1023 F_UNASSIGNED, /* M-% */
1024 F_UNASSIGNED, /* M-& */
1025 F_UNASSIGNED, /* M-' */
1026 F_UNASSIGNED, /* M-( */
1027 F_UNASSIGNED, /* M-) */
1028 F_UNASSIGNED, /* M-* */
1029 F_UNASSIGNED, /* M-+ */
1030 F_UNASSIGNED, /* M-, */
1031 F_UNASSIGNED, /* M-- */
1032 F_UNASSIGNED, /* M-. */
1033 F_UNASSIGNED, /* M-/ */
1034 F_UNASSIGNED, /* M-0 */
1035 F_UNASSIGNED, /* M-1 */
1036 F_UNASSIGNED, /* M-2 */
1037 F_UNASSIGNED, /* M-3 */
1038 F_UNASSIGNED, /* M-4 */
1039 F_UNASSIGNED, /* M-5 */
1040 F_UNASSIGNED, /* M-6 */
1041 F_UNASSIGNED, /* M-7 */
1042 F_UNASSIGNED, /* M-8 */
1043 F_UNASSIGNED, /* M-9 */
1044 F_UNASSIGNED, /* M-: */
1045 F_UNASSIGNED, /* M-; */
1046 F_UNASSIGNED, /* M-< */
1047 F_UNASSIGNED, /* M-= */
1048 F_UNASSIGNED, /* M-> */
1049 F_HELPME, /* M-? */
1050 F_UNASSIGNED, /* M-@ */
1051 F_UNASSIGNED, /* M-A */
1052 F_UNASSIGNED, /* M-B */
1053 F_UNASSIGNED, /* M-C */
1054 F_UNASSIGNED, /* M-D */
1055 F_UNASSIGNED, /* M-E */
1056 F_UNASSIGNED, /* M-F */
1057 F_UNASSIGNED, /* M-G */
1058 F_UNASSIGNED, /* M-H */
1059 F_UNASSIGNED, /* M-I */
1060 F_UNASSIGNED, /* M-J */
1061 F_UNASSIGNED, /* M-K */
1062 F_UNASSIGNED, /* M-L */
1063 F_UNASSIGNED, /* M-M */
1064 F_UNASSIGNED, /* M-N */
1065 F_XKEY, /* M-O *//* extended key esc PWP Mar 88 */
1066 F_UNASSIGNED, /* M-P */
1067 F_UNASSIGNED, /* M-Q */
1068 F_UNASSIGNED, /* M-R */
1069 F_UNASSIGNED, /* M-S */
1070 F_UNASSIGNED, /* M-T */
1071 F_UNASSIGNED, /* M-U */
1072 F_UNASSIGNED, /* M-V */
1073 F_UNASSIGNED, /* M-W */
1074 F_UNASSIGNED, /* M-X */
1075 F_UNASSIGNED, /* M-Y */
1076 F_UNASSIGNED, /* M-Z */
1077 F_XKEY, /* M-[ *//* extended key esc -mf Oct 87 */
1078 F_UNASSIGNED, /* M-\ */
1079 F_UNASSIGNED, /* M-] */
1080 F_UNASSIGNED, /* M-^ */
1081 F_UNASSIGNED, /* M-_ */
1082 F_UNASSIGNED, /* M-` */
1083 F_UNASSIGNED, /* M-a */
1084 F_UNASSIGNED, /* M-b */
1085 F_UNASSIGNED, /* M-c */
1086 F_UNASSIGNED, /* M-d */
1087 F_UNASSIGNED, /* M-e */
1088 F_UNASSIGNED, /* M-f */
1089 F_UNASSIGNED, /* M-g */
1090 F_UNASSIGNED, /* M-h */
1091 F_UNASSIGNED, /* M-i */
1092 F_UNASSIGNED, /* M-j */
1093 F_UNASSIGNED, /* M-k */
1094 F_UNASSIGNED, /* M-l */
1095 F_UNASSIGNED, /* M-m */
1096 F_UNASSIGNED, /* M-n */
1097 F_UNASSIGNED, /* M-o */
1098 F_UNASSIGNED, /* M-p */
1099 F_UNASSIGNED, /* M-q */
1100 F_UNASSIGNED, /* M-r */
1101 F_UNASSIGNED, /* M-s */
1102 F_UNASSIGNED, /* M-t */
1103 F_UNASSIGNED, /* M-u */
1104 F_UNASSIGNED, /* M-v */
1105 F_UNASSIGNED, /* M-w */
1106 F_UNASSIGNED, /* M-x */
1107 F_UNASSIGNED, /* M-y */
1108 F_UNASSIGNED, /* M-z */
1109 F_UNASSIGNED, /* M-{ */
1110 F_UNASSIGNED, /* M-| */
1111 F_UNASSIGNED, /* M-} */
1112 F_UNASSIGNED, /* M-~ */
1113 F_UNASSIGNED /* M-^? */
1114 };
1115 #endif /* WINNT_NATIVE */
1116
1117
1118 void
editinit(void)1119 editinit(void)
1120 {
1121 struct KeyFuncs *f;
1122
1123 #if defined(NLS_CATALOGS) || defined(WINNT_NATIVE)
1124 int i;
1125
1126 for (i = 0; i < F_NUM_FUNCNAMES; i++)
1127 xfree((ptr_t)(intptr_t)FuncNames[i].desc);
1128 #endif
1129
1130 f = FuncNames;
1131 f->name = "backward-char";
1132 f->func = F_CHARBACK;
1133 f->desc = CSAVS(3, 1, "Move back a character");
1134
1135 f++;
1136 f->name = "backward-delete-char";
1137 f->func = F_DELPREV;
1138 f->desc = CSAVS(3, 2, "Delete the character behind cursor");
1139
1140 f++;
1141 f->name = "backward-delete-word";
1142 f->func = F_DELWORDPREV;
1143 f->desc = CSAVS(3, 3,
1144 "Cut from beginning of current word to cursor - saved in cut buffer");
1145
1146 f++;
1147 f->name = "backward-kill-line";
1148 f->func = F_KILLBEG;
1149 f->desc = CSAVS(3, 4,
1150 "Cut from beginning of line to cursor - save in cut buffer");
1151
1152 f++;
1153 f->name = "backward-word";
1154 f->func = F_WORDBACK;
1155 f->desc = CSAVS(3, 5, "Move to beginning of current word");
1156
1157 f++;
1158 f->name = "beginning-of-line";
1159 f->func = F_TOBEG;
1160 f->desc = CSAVS(3, 6, "Move to beginning of line");
1161
1162 f++;
1163 f->name = "capitalize-word";
1164 f->func = F_CASECAPITAL;
1165 f->desc = CSAVS(3, 7,
1166 "Capitalize the characters from cursor to end of current word");
1167
1168 f++;
1169 f->name = "change-case";
1170 f->func = V_CHGCASE;
1171 f->desc = CSAVS(3, 8,
1172 "Vi change case of character under cursor and advance one character");
1173
1174 f++;
1175 f->name = "change-till-end-of-line";
1176 f->func = V_CHGTOEND; /* backward compat. */
1177 f->desc = CSAVS(3, 9, "Vi change to end of line");
1178
1179 f++;
1180 f->name = "clear-screen";
1181 f->func = F_CLEARDISP;
1182 f->desc = CSAVS(3, 10, "Clear screen leaving current line on top");
1183
1184 f++;
1185 f->name = "complete-word";
1186 f->func = F_COMPLETE;
1187 f->desc = CSAVS(3, 11, "Complete current word");
1188
1189 f++;
1190 f->name = "complete-word-fwd";
1191 f->func = F_COMPLETE_FWD;
1192 f->desc = CSAVS(3, 12, "Tab forward through files");
1193
1194 f++;
1195 f->name = "complete-word-back";
1196 f->func = F_COMPLETE_BACK;
1197 f->desc = CSAVS(3, 13, "Tab backward through files");
1198
1199 f++;
1200 f->name = "complete-word-raw";
1201 f->func = F_COMPLETE_ALL;
1202 f->desc = CSAVS(3, 14,
1203 "Complete current word ignoring programmable completions");
1204
1205 f++;
1206 f->name = "copy-prev-word";
1207 f->func = F_COPYPREV;
1208 f->desc = CSAVS(3, 15, "Copy current word to cursor");
1209
1210 f++;
1211 f->name = "copy-region-as-kill";
1212 f->func = F_COPYREGION;
1213 f->desc = CSAVS(3, 16, "Copy area between mark and cursor to cut buffer");
1214
1215 f++;
1216 f->name = "dabbrev-expand";
1217 f->func = F_DABBREV_EXPAND;
1218 f->desc = CSAVS(3, 17,
1219 "Expand to preceding word for which this is a prefix");
1220
1221 f++;
1222 f->name = "delete-char";
1223 f->func = F_DELNEXT;
1224 f->desc = CSAVS(3, 18, "Delete character under cursor");
1225
1226 f++;
1227 f->name = "delete-char-or-eof";
1228 f->func = F_DELNEXT_EOF;
1229 f->desc = CSAVS(3, 19,
1230 "Delete character under cursor or signal end of file on an empty line");
1231
1232 f++;
1233 f->name = "delete-char-or-list";
1234 f->func = F_DELNEXT_LIST;
1235 f->desc = CSAVS(3, 20,
1236 "Delete character under cursor or list completions if at end of line");
1237
1238 f++;
1239 f->name = "delete-char-or-list-or-eof";
1240 f->func = F_DELNEXT_LIST_EOF;
1241 f->desc = CSAVS(3, 21,
1242 "Delete character under cursor, list completions or signal end of file");
1243
1244 f++;
1245 f->name = "delete-word";
1246 f->func = F_DELWORDNEXT;
1247 f->desc = CSAVS(3, 22,
1248 "Cut from cursor to end of current word - save in cut buffer");
1249
1250 f++;
1251 f->name = "digit";
1252 f->func = F_DIGIT;
1253 f->desc = CSAVS(3, 23, "Adds to argument if started or enters digit");
1254
1255 f++;
1256 f->name = "digit-argument";
1257 f->func = F_ARGDIGIT;
1258 f->desc = CSAVS(3, 24, "Digit that starts argument");
1259
1260 f++;
1261 f->name = "down-history";
1262 f->func = F_DOWN_HIST;
1263 f->desc = CSAVS(3, 25, "Move to next history line");
1264
1265 f++;
1266 f->name = "downcase-word";
1267 f->func = F_CASELOWER;
1268 f->desc = CSAVS(3, 26,
1269 "Lowercase the characters from cursor to end of current word");
1270
1271 f++;
1272 f->name = "end-of-file";
1273 f->func = F_SEND_EOF;
1274 f->desc = CSAVS(3, 27, "Indicate end of file");
1275
1276 f++;
1277 f->name = "end-of-line";
1278 f->func = F_TOEND;
1279 f->desc = CSAVS(3, 28, "Move cursor to end of line");
1280
1281 f++;
1282 f->name = "exchange-point-and-mark";
1283 f->func = F_EXCHANGE_MARK;
1284 f->desc = CSAVS(3, 29, "Exchange the cursor and mark");
1285
1286 f++;
1287 f->name = "expand-glob";
1288 f->func = F_EXPAND_GLOB;
1289 f->desc = CSAVS(3, 30, "Expand file name wildcards");
1290
1291 f++;
1292 f->name = "expand-history";
1293 f->func = F_EXPAND_HISTORY;
1294 f->desc = CSAVS(3, 31, "Expand history escapes");
1295
1296 f++;
1297 f->name = "expand-line";
1298 f->func = F_EXPAND;
1299 f->desc = CSAVS(3, 32, "Expand the history escapes in a line");
1300
1301 f++;
1302 f->name = "expand-variables";
1303 f->func = F_EXPAND_VARS;
1304 f->desc = CSAVS(3, 33, "Expand variables");
1305
1306 f++;
1307 f->name = "forward-char";
1308 f->func = F_CHARFWD;
1309 f->desc = CSAVS(3, 34, "Move forward one character");
1310
1311 f++;
1312 f->name = "forward-word";
1313 f->func = F_WORDFWD;
1314 f->desc = CSAVS(3, 35, "Move forward to end of current word");
1315
1316 f++;
1317 f->name = "gosmacs-transpose-chars";
1318 f->func = F_GCHARSWITCH;
1319 f->desc = CSAVS(3, 36, "Exchange the two characters before the cursor");
1320
1321 f++;
1322 f->name = "history-search-backward";
1323 f->func = F_UP_SEARCH_HIST;
1324 f->desc = CSAVS(3, 37,
1325 "Search in history backward for line beginning as current");
1326
1327 f++;
1328 f->name = "history-search-forward";
1329 f->func = F_DOWN_SEARCH_HIST;
1330 f->desc = CSAVS(3, 38,
1331 "Search in history forward for line beginning as current");
1332
1333 f++;
1334 f->name = "insert-last-word";
1335 f->func = F_LAST_ITEM;
1336 f->desc = CSAVS(3, 39, "Insert last item of previous command");
1337
1338 f++;
1339 f->name = "i-search-fwd";
1340 f->func = F_INC_FWD;
1341 f->desc = CSAVS(3, 40, "Incremental search forward");
1342
1343 f++;
1344 f->name = "i-search-back";
1345 f->func = F_INC_BACK;
1346 f->desc = CSAVS(3, 41, "Incremental search backward");
1347
1348 f++;
1349 f->name = "keyboard-quit";
1350 f->func = F_STARTOVER;
1351 f->desc = CSAVS(3, 42, "Clear line");
1352
1353 f++;
1354 f->name = "kill-line";
1355 f->func = F_KILLEND;
1356 f->desc = CSAVS(3, 43, "Cut to end of line and save in cut buffer");
1357
1358 f++;
1359 f->name = "kill-region";
1360 f->func = F_KILLREGION;
1361 f->desc = CSAVS(3, 44,
1362 "Cut area between mark and cursor and save in cut buffer");
1363
1364 f++;
1365 f->name = "kill-whole-line";
1366 f->func = F_KILLALL;
1367 f->desc = CSAVS(3, 45, "Cut the entire line and save in cut buffer");
1368
1369 f++;
1370 f->name = "list-choices";
1371 f->func = F_LIST_CHOICES;
1372 f->desc = CSAVS(3, 46, "List choices for completion");
1373
1374 f++;
1375 f->name = "list-choices-raw";
1376 f->func = F_LIST_ALL;
1377 f->desc = CSAVS(3, 47,
1378 "List choices for completion overriding programmable completion");
1379
1380 f++;
1381 f->name = "list-glob";
1382 f->func = F_LIST_GLOB;
1383 f->desc = CSAVS(3, 48, "List file name wildcard matches");
1384
1385 f++;
1386 f->name = "list-or-eof";
1387 f->func = F_LIST_EOF;
1388 f->desc = CSAVS(3, 49,
1389 "List choices for completion or indicate end of file if empty line");
1390
1391 f++;
1392 f->name = "load-average";
1393 f->func = F_LOAD_AVERAGE;
1394 f->desc = CSAVS(3, 50, "Display load average and current process status");
1395
1396 f++;
1397 f->name = "magic-space";
1398 f->func = F_MAGIC_SPACE;
1399 f->desc = CSAVS(3, 51, "Expand history escapes and insert a space");
1400
1401 f++;
1402 f->name = "newline";
1403 f->func = F_NEWLINE;
1404 f->desc = CSAVS(3, 52, "Execute command");
1405
1406 f++;
1407 f->name = "newline-and-hold";
1408 f->func = F_NEWLINE_HOLD;
1409 f->desc = CSAVS(3, 122, "Execute command and keep current line");
1410
1411 f++;
1412 f->name = "newline-and-down-history";
1413 f->func = F_NEWLINE_DOWN_HIST;
1414 f->desc = CSAVS(3, 123, "Execute command and move to next history line");
1415
1416 f++;
1417 f->name = "normalize-path";
1418 f->func = F_PATH_NORM;
1419 f->desc = CSAVS(3, 53,
1420 "Expand pathnames, eliminating leading .'s and ..'s");
1421
1422 f++;
1423 f->name = "normalize-command";
1424 f->func = F_COMMAND_NORM;
1425 f->desc = CSAVS(3, 54,
1426 "Expand commands to the resulting pathname or alias");
1427
1428 f++;
1429 f->name = "overwrite-mode";
1430 f->func = F_INSOVR;
1431 f->desc = CSAVS(3, 55,
1432 "Switch from insert to overwrite mode or vice versa");
1433
1434 f++;
1435 f->name = "prefix-meta";
1436 f->func = F_METANEXT;
1437 f->desc = CSAVS(3, 56, "Add 8th bit to next character typed");
1438
1439 f++;
1440 f->name = "quoted-insert";
1441 f->func = F_QUOTE;
1442 f->desc = CSAVS(3, 57, "Add the next character typed to the line verbatim");
1443
1444 f++;
1445 f->name = "redisplay";
1446 f->func = F_REDISP;
1447 f->desc = CSAVS(3, 58, "Redisplay everything");
1448
1449 f++;
1450 f->name = "run-fg-editor";
1451 f->func = F_RUN_FG_EDITOR;
1452 f->desc = CSAVS(3, 59, "Restart stopped editor");
1453
1454 f++;
1455 f->name = "run-help";
1456 f->func = F_HELPME;
1457 f->desc = CSAVS(3, 60, "Look for help on current command");
1458
1459 f++;
1460 f->name = "self-insert-command";
1461 f->func = F_INSERT;
1462 f->desc = CSAVS(3, 61, "This character is added to the line");
1463
1464 f++;
1465 f->name = "sequence-lead-in";
1466 f->func = F_XKEY;
1467 f->desc = CSAVS(3, 62,
1468 "This character is the first in a character sequence");
1469
1470 f++;
1471 f->name = "set-mark-command";
1472 f->func = F_SET_MARK;
1473 f->desc = CSAVS(3, 63, "Set the mark at cursor");
1474
1475 f++;
1476 f->name = "spell-word";
1477 f->func = F_CORRECT;
1478 f->desc = CSAVS(3, 64, "Correct the spelling of current word");
1479
1480 f++;
1481 f->name = "spell-line";
1482 f->func = F_CORRECT_L;
1483 f->desc = CSAVS(3, 65, "Correct the spelling of entire line");
1484
1485 f++;
1486 f->name = "stuff-char";
1487 f->func = F_STUFF_CHAR;
1488 f->desc = CSAVS(3, 66, "Send character to tty in cooked mode");
1489
1490 f++;
1491 f->name = "toggle-literal-history";
1492 f->func = F_TOGGLE_HIST;
1493 f->desc = CSAVS(3, 67,
1494 "Toggle between literal and lexical current history line");
1495
1496 f++;
1497 f->name = "transpose-chars";
1498 f->func = F_CHARSWITCH;
1499 f->desc = CSAVS(3, 68,
1500 "Exchange the character to the left of the cursor with the one under");
1501
1502 f++;
1503 f->name = "transpose-gosling";
1504 f->func = F_GCHARSWITCH;
1505 f->desc = CSAVS(3, 69, "Exchange the two characters before the cursor");
1506
1507 f++;
1508 f->name = "tty-dsusp";
1509 f->func = F_TTY_DSUSP;
1510 f->desc = CSAVS(3, 70, "Tty delayed suspend character");
1511
1512 f++;
1513 f->name = "tty-flush-output";
1514 f->func = F_TTY_FLUSHO;
1515 f->desc = CSAVS(3, 71, "Tty flush output character");
1516
1517 f++;
1518 f->name = "tty-sigintr";
1519 f->func = F_TTY_INT;
1520 f->desc = CSAVS(3, 72, "Tty interrupt character");
1521
1522 f++;
1523 f->name = "tty-sigquit";
1524 f->func = F_TTY_QUIT;
1525 f->desc = CSAVS(3, 73, "Tty quit character");
1526
1527 f++;
1528 f->name = "tty-sigtsusp";
1529 f->func = F_TTY_TSUSP;
1530 f->desc = CSAVS(3, 74, "Tty suspend character");
1531
1532 f++;
1533 f->name = "tty-start-output";
1534 f->func = F_TTY_STARTO;
1535 f->desc = CSAVS(3, 75, "Tty allow output character");
1536
1537 f++;
1538 f->name = "tty-stop-output";
1539 f->func = F_TTY_STOPO;
1540 f->desc = CSAVS(3, 76, "Tty disallow output character");
1541
1542 f++;
1543 f->name = "undefined-key";
1544 f->func = F_UNASSIGNED;
1545 f->desc = CSAVS(3, 77, "Indicates unbound character");
1546
1547 f++;
1548 f->name = "universal-argument";
1549 f->func = F_ARGFOUR;
1550 f->desc = CSAVS(3, 78, "Emacs universal argument (argument times 4)");
1551
1552 f++;
1553 f->name = "up-history";
1554 f->func = F_UP_HIST;
1555 f->desc = CSAVS(3, 79, "Move to previous history line");
1556
1557 f++;
1558 f->name = "upcase-word";
1559 f->func = F_CASEUPPER;
1560 f->desc = CSAVS(3, 80,
1561 "Uppercase the characters from cursor to end of current word");
1562
1563 f++;
1564 f->name = "vi-beginning-of-next-word";
1565 f->func = V_WORDBEGNEXT;
1566 f->desc = CSAVS(3, 81, "Vi goto the beginning of next word");
1567
1568 f++;
1569 f->name = "vi-add";
1570 f->func = V_ADD;
1571 f->desc = CSAVS(3, 82, "Vi enter insert mode after the cursor");
1572
1573 f++;
1574 f->name = "vi-add-at-eol";
1575 f->func = V_ADDEND;
1576 f->desc = CSAVS(3, 83, "Vi enter insert mode at end of line");
1577
1578 f++;
1579 f->name = "vi-chg-case";
1580 f->func = V_CHGCASE;
1581 f->desc = CSAVS(3, 84,
1582 "Vi change case of character under cursor and advance one character");
1583
1584 f++;
1585 f->name = "vi-chg-meta";
1586 f->func = V_CHGMETA;
1587 f->desc = CSAVS(3, 85, "Vi change prefix command");
1588
1589 f++;
1590 f->name = "vi-chg-to-eol";
1591 f->func = V_CHGTOEND;
1592 f->desc = CSAVS(3, 86, "Vi change to end of line");
1593
1594 f++;
1595 f->name = "vi-cmd-mode";
1596 f->func = V_CMD_MODE;
1597 f->desc = CSAVS(3, 87,
1598 "Enter vi command mode (use alternative key bindings)");
1599
1600 f++;
1601 f->name = "vi-cmd-mode-complete";
1602 f->func = V_CM_COMPLETE;
1603 f->desc = CSAVS(3, 88, "Vi command mode complete current word");
1604
1605 f++;
1606 f->name = "vi-delprev";
1607 f->func = V_DELPREV;
1608 f->desc = CSAVS(3, 89, "Vi move to previous character (backspace)");
1609
1610 f++;
1611 f->name = "vi-delmeta";
1612 f->func = V_DELMETA;
1613 f->desc = CSAVS(3, 90, "Vi delete prefix command");
1614
1615 f++;
1616 f->name = "vi-endword";
1617 f->func = V_ENDWORD;
1618 f->desc = CSAVS(3, 91,
1619 "Vi move to the end of the current space delimited word");
1620
1621 f++;
1622 f->name = "vi-eword";
1623 f->func = V_EWORD;
1624 f->desc = CSAVS(3, 92, "Vi move to the end of the current word");
1625
1626 f++;
1627 f->name = "vi-char-back";
1628 f->func = V_CHAR_BACK;
1629 f->desc = CSAVS(3, 93, "Vi move to the character specified backward");
1630
1631 f++;
1632 f->name = "vi-char-fwd";
1633 f->func = V_CHAR_FWD;
1634 f->desc = CSAVS(3, 94, "Vi move to the character specified forward");
1635
1636 f++;
1637 f->name = "vi-charto-back";
1638 f->func = V_CHARTO_BACK;
1639 f->desc = CSAVS(3, 95, "Vi move up to the character specified backward");
1640
1641 f++;
1642 f->name = "vi-charto-fwd";
1643 f->func = V_CHARTO_FWD;
1644 f->desc = CSAVS(3, 96, "Vi move up to the character specified forward");
1645
1646 f++;
1647 f->name = "vi-insert";
1648 f->func = V_INSERT;
1649 f->desc = CSAVS(3, 97, "Enter vi insert mode");
1650
1651 f++;
1652 f->name = "vi-insert-at-bol";
1653 f->func = V_INSBEG;
1654 f->desc = CSAVS(3, 98, "Enter vi insert mode at beginning of line");
1655
1656 f++;
1657 f->name = "vi-repeat-char-fwd";
1658 f->func = V_RCHAR_FWD;
1659 f->desc = CSAVS(3, 99,
1660 "Vi repeat current character search in the same search direction");
1661
1662 f++;
1663 f->name = "vi-repeat-char-back";
1664 f->func = V_RCHAR_BACK;
1665 f->desc = CSAVS(3, 100,
1666 "Vi repeat current character search in the opposite search direction");
1667
1668 f++;
1669 f->name = "vi-repeat-search-fwd";
1670 f->func = V_RSRCH_FWD;
1671 f->desc = CSAVS(3, 101,
1672 "Vi repeat current search in the same search direction");
1673
1674 f++;
1675 f->name = "vi-repeat-search-back";
1676 f->func = V_RSRCH_BACK;
1677 f->desc = CSAVS(3, 102,
1678 "Vi repeat current search in the opposite search direction");
1679
1680 f++;
1681 f->name = "vi-replace-char";
1682 f->func = V_REPLONE;
1683 f->desc = CSAVS(3, 103,
1684 "Vi replace character under the cursor with the next character typed");
1685
1686 f++;
1687 f->name = "vi-replace-mode";
1688 f->func = V_REPLMODE;
1689 f->desc = CSAVS(3, 104, "Vi replace mode");
1690
1691 f++;
1692 f->name = "vi-search-back";
1693 f->func = V_USH_META;
1694 f->desc = CSAVS(3, 105, "Vi search history backward");
1695
1696 f++;
1697 f->name = "vi-search-fwd";
1698 f->func = V_DSH_META;
1699 f->desc = CSAVS(3, 106, "Vi search history forward");
1700
1701 f++;
1702 f->name = "vi-substitute-char";
1703 f->func = V_SUBSTCHAR;
1704 f->desc = CSAVS(3, 107,
1705 "Vi replace character under the cursor and enter insert mode");
1706
1707 f++;
1708 f->name = "vi-substitute-line";
1709 f->func = V_SUBSTLINE;
1710 f->desc = CSAVS(3, 108, "Vi replace entire line");
1711
1712 f++;
1713 f->name = "vi-word-back";
1714 f->func = V_WORDBACK;
1715 f->desc = CSAVS(3, 109, "Vi move to the previous word");
1716
1717 f++;
1718 f->name = "vi-word-fwd";
1719 f->func = V_WORDFWD;
1720 f->desc = CSAVS(3, 110, "Vi move to the next word");
1721
1722 f++;
1723 f->name = "vi-undo";
1724 f->func = V_UNDO;
1725 f->desc = CSAVS(3, 111, "Vi undo last change");
1726
1727 f++;
1728 f->name = "vi-zero";
1729 f->func = V_ZERO;
1730 f->desc = CSAVS(3, 112, "Vi goto the beginning of line");
1731
1732 f++;
1733 f->name = "which-command";
1734 f->func = F_WHICH;
1735 f->desc = CSAVS(3, 113, "Perform which of current command");
1736
1737 f++;
1738 f->name = "yank";
1739 f->func = F_YANK_KILL;
1740 f->desc = CSAVS(3, 114, "Paste cut buffer at cursor position");
1741
1742 f++;
1743 f->name = "yank-pop";
1744 f->func = F_YANK_POP;
1745 f->desc = CSAVS(3, 115,
1746 "Replace just-yanked text with yank from earlier kill");
1747
1748 f++;
1749 f->name = "e_dosify_next";
1750 f->func = F_DOSIFY_NEXT;
1751 f->desc = CSAVS(3, 118,
1752 "(WIN32 only) Convert each '/' in next word to '\\\\'");
1753
1754 f++;
1755 f->name = "e_dosify_prev";
1756 f->func = F_DOSIFY_PREV;
1757 f->desc = CSAVS(3, 119,
1758 "(WIN32 only) Convert each '/' in previous word to '\\\\'");
1759
1760 f++;
1761 f->name = "e_page_up";
1762 f->func = F_PAGE_UP;
1763 f->desc = CSAVS(3, 120, "(WIN32 only) Page visible console window up");
1764
1765 f++;
1766 f->name = "e_page_down";
1767 f->func = F_PAGE_DOWN;
1768 f->desc = CSAVS(3, 121, "(WIN32 only) Page visible console window down");
1769
1770 f++;
1771 f->name = NULL;
1772 f->func = 0;
1773 f->desc = NULL;
1774
1775 f++;
1776 if (f - FuncNames != F_NUM_FUNCNAMES)
1777 abort();
1778 }
1779
1780 #ifdef DEBUG_EDIT
1781 void
CheckMaps(void)1782 CheckMaps(void)
1783 { /* check the size of the key maps */
1784 size_t c1 = NT_NUM_KEYS * sizeof(KEYCMD);
1785
1786 if (sizeof(CcKeyMap) != c1)
1787 xprintf("CcKeyMap should be %u entries, but is %zu.\r\n",
1788 NT_NUM_KEYS, sizeof(CcKeyMap) / sizeof(KEYCMD));
1789
1790 if (sizeof(CcAltMap) != c1)
1791 xprintf("CcAltMap should be %u entries, but is %zu.\r\n",
1792 NT_NUM_KEYS, sizeof(CcAltMap) / sizeof(KEYCMD));
1793
1794 if (sizeof(CcEmacsMap) != c1)
1795 xprintf("CcEmacsMap should be %u entries, but is %zu.\r\n",
1796 NT_NUM_KEYS, sizeof(CcEmacsMap) / sizeof(KEYCMD));
1797
1798 if (sizeof(CcViMap) != c1)
1799 xprintf("CcViMap should be %u entries, but is %zu.\r\n",
1800 NT_NUM_KEYS, sizeof(CcViMap) / sizeof(KEYCMD));
1801
1802 if (sizeof(CcViCmdMap) != c1)
1803 xprintf("CcViCmdMap should be %u entries, but is %zu.\r\n",
1804 NT_NUM_KEYS, sizeof(CcViCmdMap) / sizeof(KEYCMD));
1805 }
1806
1807 #endif
1808
1809 int MapsAreInited = 0;
1810 int NLSMapsAreInited = 0;
1811 int NoNLSRebind;
1812
1813 void
ed_InitNLSMaps(void)1814 ed_InitNLSMaps(void)
1815 {
1816 int i;
1817
1818 if (AsciiOnly)
1819 return;
1820 if (NoNLSRebind)
1821 return;
1822 for (i = 0200; i <= 0377; i++) {
1823 if (Isprint(CTL_ESC(i))) {
1824 CcKeyMap[CTL_ESC(i)] = F_INSERT;
1825 }
1826 }
1827 NLSMapsAreInited = 1;
1828 }
1829
1830 static void
ed_InitMetaBindings(void)1831 ed_InitMetaBindings(void)
1832 {
1833 Char buf[3];
1834 int i;
1835 CStr cstr;
1836 KEYCMD *map;
1837
1838 map = CcKeyMap;
1839 for (i = 0; i <= 0377 && CcKeyMap[CTL_ESC(i)] != F_METANEXT; i++)
1840 continue;
1841 if (i > 0377) {
1842 for (i = 0; i <= 0377 && CcAltMap[CTL_ESC(i)] != F_METANEXT; i++)
1843 continue;
1844 if (i > 0377) {
1845 i = '\033';
1846 if (VImode)
1847 map = CcAltMap;
1848 }
1849 else {
1850 map = CcAltMap;
1851 }
1852 }
1853 buf[0] = (Char)CTL_ESC(i);
1854 buf[2] = 0;
1855 cstr.buf = buf;
1856 cstr.len = 2;
1857 for (i = 0200; i <= 0377; i++) {
1858 if (map[CTL_ESC(i)] != F_INSERT && map[CTL_ESC(i)] != F_UNASSIGNED && map[CTL_ESC(i)] != F_XKEY) {
1859 buf[1] = CTL_ESC(i & ASCII);
1860 AddXkey(&cstr, XmapCmd((int) map[CTL_ESC(i)]), XK_CMD);
1861 }
1862 }
1863 map[(unsigned char)buf[0]] = F_XKEY;
1864 }
1865
1866 void
ed_InitVIMaps(void)1867 ed_InitVIMaps(void)
1868 {
1869 int i;
1870
1871 VImode = 1;
1872 setNS(STRvimode);
1873 update_wordchars();
1874
1875 ResetXmap();
1876 for (i = 0; i < NT_NUM_KEYS; i++) {
1877 CcKeyMap[i] = CcViMap[i];
1878 CcAltMap[i] = CcViCmdMap[i];
1879 }
1880 ed_InitMetaBindings();
1881 ed_InitNLSMaps();
1882 ResetArrowKeys();
1883 BindArrowKeys();
1884 }
1885
1886 void
ed_InitEmacsMaps(void)1887 ed_InitEmacsMaps(void)
1888 {
1889 int i;
1890 Char buf[3];
1891 CStr cstr;
1892 cstr.buf = buf;
1893 cstr.len = 2;
1894
1895 VImode = 0;
1896 if (adrof(STRvimode))
1897 unsetv(STRvimode);
1898 update_wordchars();
1899
1900 ResetXmap();
1901 for (i = 0; i < NT_NUM_KEYS; i++) {
1902 CcKeyMap[i] = CcEmacsMap[i];
1903 CcAltMap[i] = F_UNASSIGNED;
1904 }
1905 ed_InitMetaBindings();
1906 ed_InitNLSMaps();
1907 buf[0] = CTL_ESC('\030');
1908 buf[2] = 0;
1909 buf[1] = CTL_ESC('\030');
1910 AddXkey(&cstr, XmapCmd(F_EXCHANGE_MARK), XK_CMD);
1911 buf[1] = '*';
1912 AddXkey(&cstr, XmapCmd(F_EXPAND_GLOB), XK_CMD);
1913 buf[1] = '$';
1914 AddXkey(&cstr, XmapCmd(F_EXPAND_VARS), XK_CMD);
1915 buf[1] = 'G';
1916 AddXkey(&cstr, XmapCmd(F_LIST_GLOB), XK_CMD);
1917 buf[1] = 'g';
1918 AddXkey(&cstr, XmapCmd(F_LIST_GLOB), XK_CMD);
1919 buf[1] = 'n';
1920 AddXkey(&cstr, XmapCmd(F_PATH_NORM), XK_CMD);
1921 buf[1] = 'N';
1922 AddXkey(&cstr, XmapCmd(F_PATH_NORM), XK_CMD);
1923 buf[1] = '?';
1924 AddXkey(&cstr, XmapCmd(F_COMMAND_NORM), XK_CMD);
1925 buf[1] = '\t';
1926 AddXkey(&cstr, XmapCmd(F_COMPLETE_ALL), XK_CMD);
1927 buf[1] = CTL_ESC('\004'); /* ^D */
1928 AddXkey(&cstr, XmapCmd(F_LIST_ALL), XK_CMD);
1929 ResetArrowKeys();
1930 BindArrowKeys();
1931 }
1932
1933 void
ed_InitMaps(void)1934 ed_InitMaps(void)
1935 {
1936 if (MapsAreInited)
1937 return;
1938 #ifndef IS_ASCII
1939 /* This machine has an EBCDIC charset. The assumptions made for the
1940 * initialized keymaps therefore don't hold, since they are based on
1941 * ASCII (or ISO8859-1).
1942 * Here, we do a one-time transformation to EBCDIC environment
1943 * for the key initializations.
1944 */
1945 {
1946 KEYCMD temp[NT_NUM_KEYS];
1947 static KEYCMD *const list[3] = { CcEmacsMap, CcViMap, CcViCmdMap };
1948 int i, table;
1949
1950 for (table=0; table<3; ++table)
1951 {
1952 /* copy ASCII ordered map to temp table */
1953 for (i = 0; i < NT_NUM_KEYS; i++) {
1954 temp[i] = list[table][i];
1955 }
1956 /* write back as EBCDIC ordered map */
1957 for (i = 0; i < NT_NUM_KEYS; i++) {
1958 list[table][_toebcdic[i]] = temp[i];
1959 }
1960 }
1961 }
1962 #endif /* !IS_ASCII */
1963
1964 #ifdef VIDEFAULT
1965 ed_InitVIMaps();
1966 #else
1967 ed_InitEmacsMaps();
1968 #endif
1969
1970 MapsAreInited = 1;
1971 }
1972