xref: /dragonfly/contrib/nvi2/common/key.h (revision b1ac2ebb)
1 /*-
2  * Copyright (c) 1991, 1993, 1994
3  *	The Regents of the University of California.  All rights reserved.
4  * Copyright (c) 1991, 1993, 1994, 1995, 1996
5  *	Keith Bostic.  All rights reserved.
6  *
7  * See the LICENSE file for redistribution information.
8  */
9 
10 #include "multibyte.h"
11 
12 #ifdef USE_WIDECHAR
13 #define FILE2INT5(sp,buf,n,nlen,w,wlen)					    \
14     sp->conv.file2int(sp, n, nlen, &buf, &wlen, &w)
15 #define INT2FILE(sp,w,wlen,n,nlen) 					    \
16     sp->conv.int2file(sp, w, wlen, &sp->cw, &nlen, &n)
17 #define CHAR2INT5(sp,buf,n,nlen,w,wlen)					    \
18     sp->conv.sys2int(sp, n, nlen, &buf, &wlen, &w)
19 #define INT2CHAR(sp,w,wlen,n,nlen) 					    \
20     sp->conv.int2sys(sp, w, wlen, &sp->cw, &nlen, &n)
21 #define INPUT2INT5(sp,cw,n,nlen,w,wlen)					    \
22     sp->conv.input2int(sp, n, nlen, &(cw), &wlen, &w)
23 #define CONST
24 #define INTISWIDE(c)        (wctob(c) == EOF)
25 #define CHAR_WIDTH(sp, ch)  wcwidth(ch)
26 #define CAN_PRINT(sp, ch)   (CHAR_WIDTH(sp, ch) > 0)
27 #else
28 #define FILE2INT5(sp,buf,n,nlen,w,wlen) \
29     (w = n, wlen = nlen, 0)
30 #define INT2FILE(sp,w,wlen,n,nlen) \
31     (n = w, nlen = wlen, 0)
32 #define CHAR2INT5(sp,buf,n,nlen,w,wlen) \
33     (w = n, wlen = nlen, 0)
34 #define INT2CHAR(sp,w,wlen,n,nlen) \
35     (n = w, nlen = wlen, 0)
36 #define INPUT2INT5(sp,buf,n,nlen,w,wlen) \
37     (w = n, wlen = nlen, 0)
38 #define CONST               const
39 #define INTISWIDE(c)        0
40 #define CHAR_WIDTH(sp, ch)  1
41 #define CAN_PRINT(sp, ch)   isprint(ch)
42 #endif
43 #define FILE2INT(sp,n,nlen,w,wlen)					    \
44     FILE2INT5(sp,sp->cw,n,nlen,w,wlen)
45 #define CHAR2INT(sp,n,nlen,w,wlen)					    \
46     CHAR2INT5(sp,sp->cw,n,nlen,w,wlen)
47 
48 /* The maximum number of columns any character can take up on a screen. */
49 #define	MAX_CHARACTER_COLUMNS	7
50 
51 /*
52  * Event types.
53  *
54  * The program structure depends on the event loop being able to return
55  * E_EOF/E_ERR multiple times -- eventually enough things will end due
56  * to the events that vi will reach the command level for the screen, at
57  * which point the exit flags will be set and vi will exit.
58  */
59 typedef enum {
60 	E_NOTUSED = 0,			/* Not set. */
61 	E_CHARACTER,			/* Input character: e_c set. */
62 	E_EOF,				/* End of input (NOT ^D). */
63 	E_ERR,				/* Input error. */
64 	E_INTERRUPT,			/* Interrupt. */
65 	E_REPAINT,			/* Repaint: e_flno, e_tlno set. */
66 	E_SIGHUP,			/* SIGHUP. */
67 	E_SIGTERM,			/* SIGTERM. */
68 	E_STRING,			/* Input string: e_csp, e_len set. */
69 	E_TIMEOUT,			/* Timeout. */
70 	E_WRESIZE,			/* Window resize. */
71 } e_event_t;
72 
73 /*
74  * Character values.
75  */
76 typedef enum {
77 	K_NOTUSED = 0,			/* Not set. */
78 	K_BACKSLASH,			/*  \ */
79 	K_CARAT,			/*  ^ */
80 	K_CNTRLD,			/* ^D */
81 	K_CNTRLR,			/* ^R */
82 	K_CNTRLT,			/* ^T */
83 	K_CNTRLZ,			/* ^Z */
84 	K_COLON,			/*  : */
85 	K_CR,				/* \r */
86 	K_ESCAPE,			/* ^[ */
87 	K_FORMFEED,			/* \f */
88 	K_HEXCHAR,			/* ^X */
89 	K_NL,				/* \n */
90 	K_RIGHTBRACE,			/*  } */
91 	K_RIGHTPAREN,			/*  ) */
92 	K_TAB,				/* \t */
93 	K_VERASE,			/* set from tty: default ^H */
94 	K_VKILL,			/* set from tty: default ^U */
95 	K_VLNEXT,			/* set from tty: default ^V */
96 	K_VWERASE,			/* set from tty: default ^W */
97 	K_ZERO				/*  0 */
98 } e_key_t;
99 
100 struct _event {
101 	TAILQ_ENTRY(_event) q;		/* Linked list of events. */
102 	e_event_t e_event;		/* Event type. */
103 	union {
104 		struct {		/* Input character. */
105 			CHAR_T c;	/* Character. */
106 			e_key_t value;	/* Key type. */
107 
108 #define	CH_ABBREVIATED	0x01		/* Character is from an abbreviation. */
109 #define	CH_MAPPED	0x02		/* Character is from a map. */
110 #define	CH_NOMAP	0x04		/* Do not map the character. */
111 #define	CH_QUOTED	0x08		/* Character is already quoted. */
112 			u_int8_t flags;
113 		} _e_ch;
114 #define	e_ch	_u_event._e_ch		/* !!! The structure, not the char. */
115 #define	e_c	_u_event._e_ch.c
116 #define	e_value	_u_event._e_ch.value
117 #define	e_flags	_u_event._e_ch.flags
118 
119 		struct {		/* Screen position, size. */
120 			size_t lno1;	/* Line number. */
121 			size_t cno1;	/* Column number. */
122 			size_t lno2;	/* Line number. */
123 			size_t cno2;	/* Column number. */
124 		} _e_mark;
125 #define	e_lno	_u_event._e_mark.lno1	/* Single location. */
126 #define	e_cno	_u_event._e_mark.cno1
127 #define	e_flno	_u_event._e_mark.lno1	/* Text region. */
128 #define	e_fcno	_u_event._e_mark.cno1
129 #define	e_tlno	_u_event._e_mark.lno2
130 #define	e_tcno	_u_event._e_mark.cno2
131 
132 		struct {		/* Input string. */
133 			CHAR_T	*asp;	/* Allocated string. */
134 			CHAR_T	*csp;	/* String. */
135 			size_t	 len;	/* String length. */
136 		} _e_str;
137 #define	e_asp	_u_event._e_str.asp
138 #define	e_csp	_u_event._e_str.csp
139 #define	e_len	_u_event._e_str.len
140 	} _u_event;
141 };
142 
143 typedef struct _keylist {
144 	e_key_t value;			/* Special value. */
145 	int	ch;			/* Key. */
146 } KEYLIST;
147 extern KEYLIST keylist[];
148 
149 					/* Return if more keys in queue. */
150 #define	KEYS_WAITING(sp)	((sp)->gp->i_cnt != 0)
151 #define	MAPPED_KEYS_WAITING(sp)						\
152 	(KEYS_WAITING(sp) &&						\
153 	    F_ISSET(&sp->gp->i_event[sp->gp->i_next].e_ch, CH_MAPPED))
154 
155 /*
156  * Ex/vi commands are generally separated by whitespace characters.  We
157  * can't use the standard isspace(3) macro because it returns true for
158  * characters like ^K in the ASCII character set.  The POSIX isblank(3)
159  * has the same problem for non-ASCII locale, so we need a standalone one.
160  */
161 
162 static __inline int
cmdskip(CHAR_T ch)163 cmdskip(CHAR_T ch)
164 {
165 	return ch == ' ' || ch == '\t';
166 }
167 
168 /* The "standard" tab width, for displaying things to users. */
169 #define	STANDARD_TAB	6
170 
171 /* Various special characters, messages. */
172 #define	CH_BSEARCH	'?'		/* Backward search prompt. */
173 #define	CH_CURSOR	' '		/* Cursor character. */
174 #define	CH_ENDMARK	'$'		/* End of a range. */
175 #define	CH_EXPROMPT	':'		/* Ex prompt. */
176 #define	CH_FSEARCH	'/'		/* Forward search prompt. */
177 #define	CH_HEX		'\030'		/* Leading hex character. */
178 #define	CH_LITERAL	'\026'		/* ASCII ^V. */
179 #define	CH_NO		'n'		/* No. */
180 #define	CH_NOT_DIGIT	'a'		/* A non-isdigit() character. */
181 #define	CH_QUIT		'q'		/* Quit. */
182 #define	CH_YES		'y'		/* Yes. */
183 
184 /*
185  * Checking for interrupts means that we look at the bit that gets set if the
186  * screen code supports asynchronous events, and call back into the event code
187  * so that non-asynchronous screens get a chance to post the interrupt.
188  *
189  * INTERRUPT_CHECK is the number of lines "operated" on before checking for
190  * interrupts.
191  */
192 #define	INTERRUPT_CHECK	100
193 #define	INTERRUPTED(sp)							\
194 	(F_ISSET((sp)->gp, G_INTERRUPTED) ||				\
195 	(!v_event_get(sp, NULL, 0, EC_INTERRUPT) &&			\
196 	F_ISSET((sp)->gp, G_INTERRUPTED)))
197 #define	CLR_INTERRUPT(sp)						\
198 	F_CLR((sp)->gp, G_INTERRUPTED)
199 
200 /* Flags describing types of characters being requested. */
201 #define	EC_INTERRUPT	0x001		/* Checking for interrupts. */
202 #define	EC_MAPCOMMAND	0x002		/* Apply the command map. */
203 #define	EC_MAPINPUT	0x004		/* Apply the input map. */
204 #define	EC_MAPNODIGIT	0x008		/* Return to a digit. */
205 #define	EC_QUOTED	0x010		/* Try to quote next character */
206 #define	EC_RAW		0x020		/* Any next character. XXX: not used. */
207 #define	EC_TIMEOUT	0x040		/* Timeout to next character. */
208 
209 /* Flags describing text input special cases. */
210 #define	TXT_ADDNEWLINE	0x00000001	/* Replay starts on a new line. */
211 #define	TXT_AICHARS	0x00000002	/* Leading autoindent chars. */
212 #define	TXT_ALTWERASE	0x00000004	/* Option: altwerase. */
213 #define	TXT_APPENDEOL	0x00000008	/* Appending after EOL. */
214 #define	TXT_AUTOINDENT	0x00000010	/* Autoindent set this line. */
215 #define	TXT_BACKSLASH	0x00000020	/* Backslashes escape characters. */
216 #define	TXT_BEAUTIFY	0x00000040	/* Only printable characters. */
217 #define	TXT_BS		0x00000080	/* Backspace returns the buffer. */
218 #define	TXT_CEDIT	0x00000100	/* Can return TERM_CEDIT. */
219 #define	TXT_CNTRLD	0x00000200	/* Control-D is a command. */
220 #define	TXT_CNTRLT	0x00000400	/* Control-T is an indent special. */
221 #define	TXT_CR		0x00000800	/* CR returns the buffer. */
222 #define	TXT_DOTTERM	0x00001000	/* Leading '.' terminates the input. */
223 #define	TXT_EMARK	0x00002000	/* End of replacement mark. */
224 #define	TXT_EOFCHAR	0x00004000	/* ICANON set, return EOF character. */
225 #define	TXT_ESCAPE	0x00008000	/* Escape returns the buffer. */
226 #define	TXT_FILEC	0x00010000	/* Option: filec. */
227 #define	TXT_INFOLINE	0x00020000	/* Editing the info line. */
228 #define	TXT_MAPINPUT	0x00040000	/* Apply the input map. */
229 #define	TXT_NLECHO	0x00080000	/* Echo the newline. */
230 #define	TXT_NUMBER	0x00100000	/* Number the line. */
231 #define	TXT_OVERWRITE	0x00200000	/* Overwrite characters. */
232 #define	TXT_PROMPT	0x00400000	/* Display a prompt. */
233 #define	TXT_RECORD	0x00800000	/* Record for replay. */
234 #define	TXT_REPLACE	0x01000000	/* Replace; don't delete overwrite. */
235 #define	TXT_REPLAY	0x02000000	/* Replay the last input. */
236 #define	TXT_RESOLVE	0x04000000	/* Resolve the text into the file. */
237 #define	TXT_SEARCHINCR	0x08000000	/* Incremental search. */
238 #define	TXT_SHOWMATCH	0x10000000	/* Option: showmatch. */
239 #define	TXT_TTYWERASE	0x20000000	/* Option: ttywerase. */
240 #define	TXT_WRAPMARGIN	0x40000000	/* Option: wrapmargin. */
241