xref: /freebsd/contrib/tcsh/ed.defns.c (revision 62cfcf62f627e5093fb37026a6d8c98e4d2ef04c)
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
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
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
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
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[buf[0]] = F_XKEY;
1864 }
1865 
1866 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
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
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